* configure (extra_debugging): New variable. EXTRA_DEBUGGING

conditionally generated in config.h.

* gc.c (break_obj): New static variable.
(mark_obj): Debugging feature: if the object is the one stored in
break_obj and not yet reached, then call breakpt.
(deheap): New debugging function for viewing regions of the heaps.

* lib.c (breakpt): New function.

* lib.h (breakpt): Declared.

1 files changed, 10 insertions, 0 deletions

diff --git a/lib.c b/lib.c
index fdf5758e..a605a556 100644
--- a/lib.c
+++ b/lib.c
@@ -3228,3 +3228,13 @@ void d(val obj)
 {
   dump(obj, std_output);
 }
+
+/*
+ * Function for software breakpoints.
+ * Debugging routines call here when a breakpoint
+ * is requested. For this to work, set a breakpoint
+ * on this function.
+ */
+void breakpt(void)
+{
+}