diff --git a/core/parser/parser.factor b/core/parser/parser.factor
index d7c3ae8592..8dcca00e3a 100644
--- a/core/parser/parser.factor
+++ b/core/parser/parser.factor
@@ -399,18 +399,6 @@ SYMBOL: bootstrap-syntax
         "Loading " write <pathname> . flush
     ] if ;
 
-: no-parse-hook ( quot -- )
-    >r f parse-hook r> with-variable do-parse-hook ; inline
-
-: start-parsing ( stream name -- )
-    H{ } clone new-definitions set
-    dup [
-        source-file
-        dup file set
-        source-file-definitions clone old-definitions set
-    ] [ drop ] if
-    lines \ lines set ;
-
 : smudged-usage-warning ( usages removed -- )
     parser-notes? [
         "Warning: the following definitions were removed from sources," print
diff --git a/core/source-files/source-files.factor b/core/source-files/source-files.factor
index 420fa90343..35b01e8c43 100755
--- a/core/source-files/source-files.factor
+++ b/core/source-files/source-files.factor
@@ -33,8 +33,8 @@ uses definitions ;
     dup source-file-path ?resource-path file-modified
     swap set-source-file-modified ;
 
-: record-checksum ( source-file lines -- )
-    lines-crc32 swap set-source-file-checksum ;
+: record-checksum ( lines source-file -- )
+    swap lines-crc32 swap set-source-file-checksum ;
 
 : (xref-source) ( source-file -- pathname uses )
     dup source-file-path <pathname> swap source-file-uses