Skip to content
Snippets Groups Projects
Commit f350b8a6 authored by wlott's avatar wlott
Browse files

Only initialized the binding stack pointer when we are loading a kernel

core.
parent ec1088c6
No related branches found
No related tags found
No related merge requests found
/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/ldb/Attic/ldb.c,v 1.11 1991/02/16 01:00:31 wlott Exp $ */
/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/ldb/Attic/ldb.c,v 1.12 1991/05/03 07:55:49 wlott Exp $ */
/* Lisp kernel core debugger */
#include <stdio.h>
......@@ -88,7 +88,8 @@ char *envp[];
restore_state = load_core_file(core);
#ifdef ibmrt
SetSymbolValue(BINDING_STACK_POINTER, (lispobj)binding_stack);
if (!restore_state)
SetSymbolValue(BINDING_STACK_POINTER, (lispobj)binding_stack);
#endif
interrupt_init();
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment