                            (sesame-statement->IStatement msg)))]
           (map read-rdf statements))))))
 
-(defn shutdown [repo]
+(defn shutdown
   "Cleanly shutsdown the repository."
+  [repo]
   (.shutDown repo))

  (rollback [repo]
    (-> repo .rollback)))

(defmacro with-transaction [repo & forms]
  "Wraps the given forms in a transaction on the supplied repository.
  Exceptions are rolled back on failure."
  `(try
    (pr/begin ~repo)
    (let [return# (do ~@forms)]

  ([datadir indexes]
     (NativeStore. datadir indexes)))

(defn http-repo
  "Given a URL as a String return a Sesame HTTPRepository for e.g.
  interacting with the OpenRDF Workbench."
  [repo-url]
  (doto (HTTPRepository. repo-url)
    (.initialize)))

