diff --git a/src/lisp/lisp.c b/src/lisp/lisp.c index 425f1b73667c8789aa774f75f26eebf3146e6988..bd81fdafa9b2c6e12f0684e00fa306007d828535 100644 --- a/src/lisp/lisp.c +++ b/src/lisp/lisp.c @@ -687,6 +687,13 @@ main(int argc, const char *argv[], const char *envp[]) if (builtin_image_flag != 0) map_core_sections(argv[0]); #endif + + /* + * Validate the basic lisp spaces first like the heap and static + * and read-only spaces. Do this so that the stacks (if thy're + * relocatable) don't get randomly allocated on top of our desired + * lisp spaces. + */ validate(); gc_init(); validate_stacks();