(ns clojure-sql.core-test (:refer-clojure :exclude [sort-by]) (:require [clojure-sql.core :refer :all] [midje.sweet :refer :all])) (fact (compile-query nil (table :user)) => ["SELECT * FROM \"user\""] (compile-query nil (-> (table :user) (select '(= :username "george")))) => ["SELECT * FROM \"user\" WHERE (\"user\".\"username\" = ?)" "george"])