           (split-barcodes (sample-ifq-xref samp)
                           sqxform-fn
                           (bc-file-specs ibc)
+                          no-barcodes?
                           (barcode-maps ibc)
                           (red1codes sid)
                           qc-ctpt sqc%))))

      (loop [recs (bufiles/read-fqrecs inf rec-chunk-size)]
        (if (not (seq recs))
          :done
          (let [recs (r/fold
                      partition
                      (fn([] [])
                        ([V v]

                 file-groups)))))

(defn split-barcodes
  [in-fq sqxform-fn ot-fq-map
   no-barcodes? barcodes-map other-barcodes
   qc-ctpt sqc%]

  (letio [bclen (->> ot-fq-map keys first count long)
          inf (io/open-streaming-gzip in-fq :in)
