codebase-analyzer: split up c header/src words

diff --git a/extra/codebase-analyzer/codebase-analyzer.factor b/extra/codebase-analyzer/codebase-analyzer.factor
index 9f6afa163b3ec65e4127a54721cea01959b33e97..33b9c1870908325e9648952e987a733675ecb068 100644 (file)
--- a/extra/codebase-analyzer/codebase-analyzer.factor
+++ b/extra/codebase-analyzer/codebase-analyzer.factor
@@ -88,13 +88,21 @@ IN: codebase-analyzer
 : swift-files ( paths -- paths' ) [ ".swift" tail? ] filter ;
 
 : c-file? ( path -- ? )
-    >lower file-extension { "h" "c" } member? ;
+    >lower file-extension { "c" } member? ;
 : c-files ( paths -- paths' ) [ c-file? ] filter ;
 
+: c-header-file? ( path -- ? )
+    >lower file-extension { "h" } member? ;
+: c-header-files ( paths -- paths' ) [ c-header-file? ] filter ;
+
 : cpp-file? ( path -- ? )
-    >lower file-extension { "h" "hh" "hpp" "cc" "cpp" } member? ;
+    >lower file-extension { "cc" "cpp" } member? ;
 : cpp-files ( paths -- paths' ) [ cpp-file? ] filter ;
 
+: cpp-header-file? ( path -- ? )
+    >lower file-extension { "h" "hh" "hpp" } member? ;
+: cpp-header-files ( paths -- paths' ) [ cpp-header-file? ] filter ;
+
 : python-file? ( path -- ? )
     >lower file-extension {
         "py" "py3" "pyc" "pyo" "pyw" "pyx" "pyd"