Add tests for seq resolver

chrovis · Feb 28, 2024 · a3faa0f · a3faa0f
1 parent d7f63ac
commit a3faa0f
Showing 1 changed file with 18 additions and 0 deletions.
diff --git a/test/cljam/io/cram/seq_resolver_test.clj b/test/cljam/io/cram/seq_resolver_test.clj
@@ -0,0 +1,18 @@
+(ns cljam.io.cram.seq-resolver-test
+  (:require [cljam.io.cram.seq-resolver :as resolver]
+            [cljam.io.cram.seq-resolver.protocol :as proto]
+            [cljam.test-common :as common]
+            [clojure.test :refer [are deftest]]))
+
+(deftest resolve-sequence-test
+  (let [resolver (resolver/seq-resolver common/test-fa-file)
+        resolver' (resolver/clone-seq-resolver resolver)]
+    (are [?region ?expected]
+         (= ?expected
+            (proto/resolve-sequence resolver ?region)
+            (proto/resolve-sequence resolver' ?region))
+      {:chr "ref" :start 1 :end 5}
+      "AGCAT"
+
+      {:chr "unknown" :start 1 :end 5}
+      nil)))