From f066d290280613acfdeedebf8c93b04692a4a7f9 Mon Sep 17 00:00:00 2001 From: Christophe Rhodes Date: Wed, 7 Jan 2004 17:30:31 +0000 Subject: [PATCH] 0.8.7.9: Fix building on non-x86 ... protect setup_i386_stack_scav with X86/GENCGC once more (noted by Fabricio Chalub and Raymond Wiker) --- src/runtime/purify.c | 4 +++- version.lisp-expr | 2 +- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/src/runtime/purify.c b/src/runtime/purify.c index cb7ed3f..db80505 100644 --- a/src/runtime/purify.c +++ b/src/runtime/purify.c @@ -1344,12 +1344,14 @@ purify(lispobj static_roots, lispobj read_only_roots) fflush(stdout); #endif +#if (defined(LISP_FEATURE_GENCGC) && defined(LISP_FEATURE_X86)) /* note this expects only one thread to be active. We'd have to * stop all the others in the same way as GC does if we wanted * PURIFY to work when >1 thread exists */ setup_i386_stack_scav(((&static_roots)-2), ((void *)all_threads->control_stack_end)); - +#endif + pscav(&static_roots, 1, 0); pscav(&read_only_roots, 1, 1); diff --git a/version.lisp-expr b/version.lisp-expr index 5bfe23a..a15c236 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.8.7.8" +"0.8.7.9" -- 1.7.10.4