]> gitweb.factorcode.org Git - factor.git/commitdiff
remove gc env slot
authorSlava Pestov <slava@factorcode.org>
Wed, 13 Oct 2004 03:52:03 +0000 (03:52 +0000)
committerSlava Pestov <slava@factorcode.org>
Wed, 13 Oct 2004 03:52:03 +0000 (03:52 +0000)
library/platform/native/init.factor
library/platform/native/kernel.factor
native/run.h

index 5014a752a0e43cf23be710f670c18c741582ee59..659b624ccfb358aed228ceb1972d1bbff7420a5e 100644 (file)
@@ -41,12 +41,8 @@ USE: vectors
 : init-errors ( -- )
     64 <vector> set-catchstack* ;
 
-: init-gc ( -- )
-    [ garbage-collection ] 7 setenv ;
-
 : boot ( -- )
     #! Initialize an interpreter with the basic services.
-    init-gc
     init-errors
     init-namespaces
     init-threads
index 1667726cee59d98c616123d1741ac77392eb9ade..c20e9a29ce8017b8f914e07ed2338dbacb0da1a0 100644 (file)
@@ -48,7 +48,7 @@ USE: vectors
 
 : cpu ( -- arch )
     #! Returns one of "x86" or "unknown".
-    11 getenv ;
+    7 getenv ;
 
 ! The 'fake vtable' used here speeds things up a lot.
 ! It is quite clumsy, however. A higher-level CLOS-style
index 550fc982069b01ed3ae34257616a991013d2a725..dfb316464848ddf46ae85bb2e8d500c45b2badb6 100644 (file)
@@ -7,11 +7,10 @@
 #define GLOBAL_ENV     4
 #define BREAK_ENV      5
 #define CATCHSTACK_ENV 6 /* used by library only */
-#define GC_ENV         7
+#define CPU_ENV        7
 #define BOOT_ENV       8
 #define RUNQUEUE_ENV   9 /* used by library only */
 #define ARGS_ENV       10
-#define CPU_ENV        11
 
 /* Profiling timer */
 struct itimerval prof_timer;