    [clj-jgit.internal  :as giti]
    [clj-jgit.porcelain :as gitp]
    [clj-jgit.querying  :as gitq]
+   [clj-cdt.clj-cdt :refer :all]
+   [clj-cdt.writer-util :refer :all]
    [atom-finder.patch :refer :all]
    [atom-finder.atom-patch :refer :all]
    [atom-finder.atoms-in-dir :refer :all]

       (map prn)
       )
  )

   )
  )

;; try parsing emacs with C instead of C++
'((def emacs-repo (->> "~/opt/src/atom-finder/emacs" expand-home gitp/load-repo)))
'((-<>> "src/atimer.c"
       (rev-filestr emacs-repo "1c027a2427524def8a03ee4ad3e48fefa352a9b0")
       (parse-source <> {:language :c})
       flatten-tree
       (map type)
       (pap count)
