   (save! [this]
     "Writes the given entity to the data store."))
 
+
+
+;;; ----------------------------------------------------------------------------
+;;; helper functions; do not use these directly
+;;; ----------------------------------------------------------------------------
 
 (defn- unqualified-name [sym]
   (let [s (str sym)

            Query Query$FilterOperator Query$SortDirection]))


(defonce *datastore-service* (atom nil))
(defonce *current-transaction* nil)


   :dsc Query$SortDirection/DESCENDING
   :desc Query$SortDirection/DESCENDING})



;;; ----------------------------------------------------------------------------
;;; datastore service management functions; use directly if necessary
;;; ----------------------------------------------------------------------------

(defn get-datastore-service []
  (when (nil? @*datastore-service*)
