   (:require [clojurewerkz.cassaforte.aliases :as alias]
             [clojure.core.match              :refer [match]]))
 
-(set! *warn-on-reflection* false)
+(set! *warn-on-reflection* true)
 
 (def ^:dynamic *batch* false)
 

;; Select Query
;;

(let [where-clause (fn [query-builder m]
                     (reduce #(.and %1 %2)
                             (.where query-builder)
                             (to-clauses m)))
      order        {:what-count   1


(let [eq                  (fn [^String column ^Object value]
                            (QueryBuilder/eq column value))
      in                  (fn [^String column ^java.util.List values]
                            (QueryBuilder/in column values))
      lt                  (fn [^String column ^Object value]
                            (QueryBuilder/lt column value))
