                           {:class \"SimpleStrategy\"
                            :replication_factor 1}}))"
   [^Session session & query-params]
-  (execute- session query-params q/create-keyspace-query))
+  (cc/execute session
+              (compile-query- q/create-keyspace-query query-params)))
 
 (defn create-index
   "Creates a new (automatic) secondary index for a given (existing)

                    (index-name :users_city)
                    (if-not-exists))"
  [^Session session & query-params]
  (execute- session query-params q/create-index-query))

(defn drop-index
  "Drop an existing secondary index. The argument of the statement

  "Drops a table: this results in the immediate, irreversible removal of a table, including
   all data in it."
  [^Session session ks]
  (cc/execute session
              (q/drop-table-query ks)))

(defn use-keyspace
  "Takes an existing keyspace name as argument and set it as the per-session current working keyspace.
   All subsequent keyspace-specific actions will be performed in the context of the selected keyspace,
   unless otherwise specified, until another USE statement is issued or the connection terminates."
  [^Session session ks]
  (cc/execute session
              (q/use-keyspace-query ks)))

(defn alter-table
  "Alters a table definition. Use it to add new
   columns, drop existing ones, change the type of existing columns, or update the table options."
  [^Session session & query-params]
  (cc/execute session
              (compile-query- q/alter-table-query query-params)))

(defn alter-keyspace
  "Alters properties of an existing keyspace. The
   supported properties are the same that for `create-keyspace`"
  [^Session session & query-params]
  (cc/execute session
              (compile-query- q/alter-keyspace-query query-params)))

;;
;; DB Operations
