Add more tests to improve coverage for CRAM region read

chrovis · May 15, 2024 · 3623b37 · 3623b37
1 parent b1b0ea4
commit 3623b37
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/test/cljam/io/cram_test.clj b/test/cljam/io/cram_test.clj
@@ -25,7 +25,12 @@
            (cram/read-refs cram-rdr')))
     (is (= (map fixup-bam-aln (sam/read-alignments bam-rdr))
            (cram/read-alignments cram-rdr)
-           (cram/read-alignments cram-rdr')))))
+           (cram/read-alignments cram-rdr')))
+    (are [?region ?count] (= ?count
+                             (count (cram/read-alignments cram-rdr ?region))
+                             (count (cram/read-alignments cram-rdr' ?region)))
+      {:chr "ref"} 6
+      {:chr "ref2", :start 35, :end 35} 2)))
 
 (deftest-remote reader-with-multiple-containers-test
   (with-before-after {:before (prepare-cavia!)}