From d70e99185025eeef545248321c04d885aa6a38c2 Mon Sep 17 00:00:00 2001
From: Carlo Zancanaro <carlo@clearboxsystems.com.au>
Date: Tue, 14 May 2013 11:12:05 +1000
Subject: Most of the RA stuff works now.

Need to fix up the compilation to return a query ready for value substitution
by the jdbc stuff, or something (rather than embedding parameters in the
query).

Also need to add insert!, update! and delete! functions.
---
 src/clojure_sql/util.clj | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 src/clojure_sql/util.clj

(limited to 'src/clojure_sql/util.clj')

diff --git a/src/clojure_sql/util.clj b/src/clojure_sql/util.clj
new file mode 100644
index 0000000..03c90f1
--- /dev/null
+++ b/src/clojure_sql/util.clj
@@ -0,0 +1,10 @@
+(ns clojure-sql.util)
+
+(defn flip [f]
+  (fn [& args]
+    (apply f (reverse args))))
+
+(defn flip-map [m]
+  (->> m
+       (map (comp vec reverse))
+       (into {})))
-- 
cgit v1.2.3