        )
   )
 
-;(pprint (sum-found-atoms (dedupe-preprocessors psgl)))
 
 (defn found-atom-source
   [atom-name results]

       )
  )

; (found-atom-source :reversed-subscript psgl)
(def vsx_preempt (slurp-lines (expand-home "~/opt/src/linux/tools/testing/selftests/powerpc/math/vsx_preempt.c")))
;(pprint (map vector (range) vsx_preempt))

   (map atom-lookup [:preprocessor-in-statement :reversed-subscript]))
)

(defn dedupe-preprocessors
  [results]
(->> results
