   (:require [clojure.test :refer :all]
             [clojure.java.io :as cio]
             [clojure.string :as cstr]
+            [clojure.walk :as walk]
             [cljam.test-common :refer :all]
             [cljam.io.pileup :as plpio]
             [cljam.io.sequence :as cseq]

  (:import [java.io File StringWriter StringReader]
           [cljam.io.pileup PileupReader PileupWriter]))

;; Reader
;; ------


                                            {:start? false, :mapq nil, :base \A, :qual 33, :reverse? false, :end? true, :insertion nil, :deletion 2, :alignment nil}]}))
  (testing "with-ref"
    (are [?in ?out]
        (= ?out (rec->map (#'plpio/parse-pileup-line ?in)))
      "chr1\t10\tA\t0\t\t" {:rname "chr1", :pos 10, :ref \A, :count 0,
                            :pile []}
      "chr1\t10\ta\t1\t.\tI" {:rname "chr1", :pos 10, :ref \a, :count 1,
