X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fruntime.c;h=fba25c0bd23366c49cf1ddde2c2820d8fa309f80;hb=f815f89eb5b1a7d5e6fefaf5b19321d8870931f9;hp=09e92c856c603e12c9d73cc434f54476d1eff198;hpb=15db958047c1f1190b57e34ef89e5d71da4dc1cc;p=sbcl.git diff --git a/src/runtime/runtime.c b/src/runtime/runtime.c index 09e92c8..fba25c0 100644 --- a/src/runtime/runtime.c +++ b/src/runtime/runtime.c @@ -309,8 +309,10 @@ main(int argc, char *argv[], char *envp[]) if (errno) lose("argument to --dynamic-space-size is not a number"); # ifdef MAX_DYNAMIC_SPACE_END - if (!((DYNAMIC_SPACE_START < DYNAMIC_SPACE_START+dynamic_space_size) && - (DYNAMIC_SPACE_START+dynamic_space_size <= MAX_DYNAMIC_SPACE_END))) + if (!((DYNAMIC_SPACE_START < + DYNAMIC_SPACE_START+dynamic_space_size) && + (DYNAMIC_SPACE_START+dynamic_space_size <= + MAX_DYNAMIC_SPACE_END))) lose("specified --dynamic-space-size too large"); # endif } else if (0 == strcmp(arg, "--control-stack-size")) { @@ -433,8 +435,8 @@ main(int argc, char *argv[], char *envp[]) lose("couldn't find initial function\n"); } #ifdef LISP_FEATURE_HPUX - /* -1 = CLOSURE_FUN_OFFSET, 23 = SIMPLE_FUN_CODE_OFFSET, we are not in LANGUAGE_ASSEMBLY - so we cant reach them. */ + /* -1 = CLOSURE_FUN_OFFSET, 23 = SIMPLE_FUN_CODE_OFFSET, we are + * not in LANGUAGE_ASSEMBLY so we cant reach them. */ return_from_lisp_stub = (void *) ((char *)*((unsigned long *) ((char *)initial_function + -1)) + 23); #endif