    [atom-finder.util :refer :all]
    [atom-finder.atom-patch :refer :all]
    [atom-finder.questions.question-util :refer :all]
+   [clj-cdt.clj-cdt :refer :all]
+   [clj-cdt.expr-operator :refer :all]
+   [clj-cdt.writer-util :refer :all]
    [clojure.pprint :refer [pprint]]
    [clojure.string :as string]
    [swiss.arrows :refer :all]

  (-> node expr-operator :name (or (write-node-type node))))

;; List all node counts file-by-file
'((prn (now)))
'((->> atom-finder-corpus-path
       (pmap-dir-c-files
        (fn [file]
          (assoc

           :file (atom-finder-relative-path file))))
       (map prn)
       dorun
       (log-to edn-file)
       time-mins
       ))

(defn c-files-no-cpp-or-h
  "Search directory structure for C-only files"
