diff --git a/lisp/alloc.c b/lisp/alloc.c index e896a447f1c2db3b92f668217b38296220f0a82a..7aacdbfe0d5f69d93d771e2d5eb6775de8af2e5c 100644 --- a/lisp/alloc.c +++ b/lisp/alloc.c @@ -1,4 +1,4 @@ -/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/alloc.c,v 1.3 1997/01/21 00:28:13 ram Exp $ */ +/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/alloc.c,v 1.4 1997/11/08 15:33:48 dtc Exp $ */ #include "lisp.h" #include "internals.h" @@ -27,7 +27,7 @@ /**************************************************************** Allocation Routines. ****************************************************************/ -#if defined WANT_CGC +#if defined(WANT_CGC) || defined(GENCGC) extern lispobj *alloc(int bytes); #else static lispobj *alloc(int bytes) diff --git a/lisp/validate.c b/lisp/validate.c index f113fcd063d4d8336791feec5743b57e61cb462d..b9bf97c52dcc514ef883efb8033345a2900f298b 100644 --- a/lisp/validate.c +++ b/lisp/validate.c @@ -1,5 +1,5 @@ /* - * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/validate.c,v 1.5 1997/01/21 00:28:13 ram Exp $ + * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/validate.c,v 1.6 1997/11/08 15:33:49 dtc Exp $ * * Memory Validation */ @@ -65,7 +65,9 @@ void validate(void) /* Dynamic-1 Space */ dynamic_1_space = (lispobj *) DYNAMIC_1_SPACE_START; - ensure_space(dynamic_1_space, DYNAMIC_SPACE_SIZE); +#ifndef GENCGC + ensure_space(dynamic_1_space, DYNAMIC_SPACE_SIZE); +#endif /* Control Stack */ control_stack = (lispobj *) CONTROL_STACK_START;