X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fcoreparse.c;h=6ac74bac77f88e1bd7779ac0794696ce46bcc239;hb=4ed3f0d08c3a57a6762018d9622f253ab9d0f2b6;hp=2d03737dd1291ecaef3103205ed01a90af11cbde;hpb=3bb2fb5b9ecdeebecaded4ac6e5af0f653be8867;p=sbcl.git

diff --git a/src/runtime/coreparse.c b/src/runtime/coreparse.c
index 2d03737..6ac74ba 100644
--- a/src/runtime/coreparse.c
+++ b/src/runtime/coreparse.c
@@ -33,8 +33,7 @@
 #include "arch.h"
 #include "interr.h"
 #include "sbcl.h"
-#include "genesis/symbol.h"
-#include "genesis/static-symbols.h"
+#include "thread.h"
 
 unsigned char build_id[] =
 #include "../../output/build-id.tmp"
@@ -91,10 +90,10 @@ process_directory(int fd, u32 *ptr, int count)
 	    }
 #endif
 /* FIXME: Should the conditional here be reg_ALLOC instead of
- *   defined(__i386__)
+ *   defined(LISP_FEATURE_X86)
  * ? */
 #if defined(LISP_FEATURE_X86)
-	    SetSymbolValue(ALLOCATION_POINTER, (lispobj)free_pointer);
+	    SetSymbolValue(ALLOCATION_POINTER, (lispobj)free_pointer,0);
 #else
 	    dynamic_space_free_pointer = free_pointer;
 #endif