X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fparse.c;h=4038f51104dd180900ee060159c18afd2dcf2d27;hb=c8218514d751c4d777892b79bbf1ca6597f731c0;hp=17b61b194770eec5b8366e255d7f2e3ad676bcd2;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git diff --git a/src/runtime/parse.c b/src/runtime/parse.c index 17b61b1..4038f51 100644 --- a/src/runtime/parse.c +++ b/src/runtime/parse.c @@ -1,3 +1,5 @@ +/* parsing for LDB monitor */ + /* * This software is part of the SBCL system. See the README file for * more information. @@ -15,6 +17,9 @@ #include "runtime.h" #include "sbcl.h" + +#if defined(LISP_FEATURE_SB_LDB) + #include "globals.h" #include "vars.h" #include "parse.h" @@ -247,7 +252,7 @@ static boolean lookup_symbol(char *name, lispobj *result) /* Search dynamic space. */ headerptr = (lispobj *)DYNAMIC_SPACE_START; -#if !defined(ibmrt) && !defined(__i386__) +#if !defined(__i386__) count = dynamic_space_free_pointer - (lispobj *)DYNAMIC_SPACE_START; @@ -356,3 +361,5 @@ char **ptr; return result; } + +#endif /* defined(LISP_FEATURE_SB_LDB) */