X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fparse.c;h=01e438116c3383f1651c4b4ab9b5aafac741d6b9;hb=7f0f521aa3f6b45259c5dfd5f7f11adcd1a7cac6;hp=4038f51104dd180900ee060159c18afd2dcf2d27;hpb=81cfdf526490d642c73602ebac9bcacb8af644e1;p=sbcl.git

diff --git a/src/runtime/parse.c b/src/runtime/parse.c
index 4038f51..01e4381 100644
--- a/src/runtime/parse.c
+++ b/src/runtime/parse.c
@@ -246,7 +246,7 @@ static boolean lookup_symbol(char *name, lispobj *result)
 	(lispobj *)SymbolValue(STATIC_SPACE_FREE_POINTER) -
 	(lispobj *)STATIC_SPACE_START;
     if (search_for_symbol(name, &headerptr, &count)) {
-        *result = (lispobj)headerptr | type_OtherPointer;
+        *result = (lispobj)headerptr | OTHER_POINTER_LOWTAG;
         return 1;
     }
 
@@ -262,7 +262,7 @@ static boolean lookup_symbol(char *name, lispobj *result)
 	(lispobj *)DYNAMIC_SPACE_START;
 #endif
     if (search_for_symbol(name, &headerptr, &count)) {
-        *result = (lispobj)headerptr | type_OtherPointer;
+        *result = (lispobj)headerptr | OTHER_POINTER_LOWTAG;
         return 1;
     }