From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 23 Jan 2018 06:40:58 +0000 (-0800)
Subject: Move fixart and thread-low to earlier in the cold load.
X-Git-Tag: mit-scheme-pucked-x11-0.3.1~7^2~317
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d4db0410d0dc39d3fb3ff897634d59a163fff87d;p=mit-scheme.git

Move fixart and thread-low to earlier in the cold load.
---

diff --git a/src/runtime/make.scm b/src/runtime/make.scm
index 9b67f97ea..ac06ee3aa 100644
--- a/src/runtime/make.scm
+++ b/src/runtime/make.scm
@@ -359,17 +359,17 @@ USA.
 	 ("boot" . (RUNTIME BOOT-DEFINITIONS))
 	 ("queue" . (RUNTIME SIMPLE-QUEUE))
 	 ("equals" . (RUNTIME EQUALITY))
+	 ("fixart" . (runtime fixnum-arithmetic))
 	 ("list" . (RUNTIME LIST))
 	 ("srfi-1" . (runtime srfi-1))
+	 ("thread-low" . (runtime thread))
 	 ("vector" . (RUNTIME VECTOR))))
       (files1
        '(("ustring" . (RUNTIME USTRING))
 	 ("symbol" . (RUNTIME SYMBOL))
 	 ("uproc" . (RUNTIME PROCEDURE))
-	 ("fixart" . (RUNTIME FIXNUM-ARITHMETIC))
 	 ("random" . (RUNTIME RANDOM-NUMBER))
 	 ("gentag" . (runtime tagged-dispatch))
-	 ("thread-low" . (RUNTIME THREAD))
 	 ("poplat" . (RUNTIME POPULATION))
 	 ("record" . (RUNTIME RECORD))
 	 ("bundle" . (runtime bundle))))