From 72de9c2e30c6652712227eca01a46a4cf532ea90 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Sat, 26 Apr 2014 20:58:24 +0000 Subject: [PATCH] Make definition of VERIFY-HEAP primitive unconditional. Define a verify_heap stub that always returns true if !ENABLE_DEBUGGING_TOOLS. --- src/microcode/debug.c | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/src/microcode/debug.c b/src/microcode/debug.c index c5336cb97..2bcef355a 100644 --- a/src/microcode/debug.c +++ b/src/microcode/debug.c @@ -955,6 +955,16 @@ verify_heap (void) return (c && h); } +#else /* !ENABLE_DEBUGGING_TOOLS */ + +bool +verify_heap (void) +{ + return true; +} + +#endif + DEFINE_PRIMITIVE ("VERIFY-HEAP", Prim_verify_heap, 0, 0, "Validate the heap.\n\ Complains if a scan of the heap encounters anything unexpected.\n\ @@ -963,7 +973,6 @@ Returns #T if the scan was successful and #F if there were any complaints.") PRIMITIVE_HEADER (0); PRIMITIVE_RETURN (verify_heap () ? SHARP_T : SHARP_F); } -#endif /* Code for interactively setting and clearing the interpreter debugging flags. Invoked via the "D" command to the ^C -- 2.25.1