 ;; bwasw test
 ;; ----------
 
+(fact "about sw-option"
+  (type (bwa/sw-option)) => SwOption
+  (type (bwa/sw-option nil)) => SwOption
+  (type (bwa/sw-option {})) => SwOption
+  (type (bwa/sw-option {:skip-sw 1})) => SwOption)
+
 (with-state-changes [(before :facts (do (prepare-cache!)
                                         (doseq [f test-db-files]
                                           (fs/copy f (str temp-dir "/" (fs/base-name f))))

            [clojure.java.io :as io]
            [me.raynes.fs :as fs]
            [clj-bwa.core :as bwa])
  (:import [clj_bwa.jna MemOption FastmapOption]))

(defmacro with-out-file
  [f & body]


;; samse test
;; ----------

(fact "about samse-option"
  (type (bwa/samse-option)) => SamseOption
  (type (bwa/samse-option nil)) => SamseOption
  (type (bwa/samse-option {})) => SamseOption
  (type (bwa/samse-option {:n-occ 4})) => SamseOption)

(with-state-changes [(before :facts (do (prepare-cache!)
                                        (doseq [f test-db-files]
