diff --git a/boehm-gc/ChangeLog b/boehm-gc/ChangeLog
index 805ab77ad73..274d3098f22 100644
--- a/boehm-gc/ChangeLog
+++ b/boehm-gc/ChangeLog
@@ -1,3 +1,10 @@
+2000-09-04  Anthony Green  <green@redhat.com>
+
+	Fix for PR libgcj/230:
+	* mark.c (GC_mark_from_mark_stack): Remove call to
+	GC_debug_object_start.
+	* gc_priv.h (GC_debug_object_start): Remove prototype.
+
 2000-08-16  Alexandre Oliva  <aoliva@redhat.com>
 
 	* gcconfig.h [OSF1] (_end): Declare as `int'.
diff --git a/boehm-gc/gc_priv.h b/boehm-gc/gc_priv.h
index 841b752f9f3..c0fa5d6e93c 100644
--- a/boehm-gc/gc_priv.h
+++ b/boehm-gc/gc_priv.h
@@ -1772,10 +1772,6 @@ void GC_print_obj(/* ptr_t p */);
 			/* P points to somewhere inside an object with	*/
 			/* debugging info.  Print a human readable	*/
 			/* description of the object to stderr.		*/
-ptr_t GC_debug_object_start(/* ptr_t p */);
-			/* P points to the start of an object that may  */
-			/* have debug info at its head.  Return the     */
-			/* start of the real data.                      */
 extern void (*GC_check_heap)();
 			/* Check that all objects in the heap with 	*/
 			/* debugging info are intact.  Print 		*/
diff --git a/boehm-gc/mark.c b/boehm-gc/mark.c
index 461d9897957..36c0b69317e 100644
--- a/boehm-gc/mark.c
+++ b/boehm-gc/mark.c
@@ -530,9 +530,6 @@ void GC_mark_from_mark_stack()
         case DS_PROC:
           GC_mark_stack_top_reg--;
           credit -= PROC_BYTES;
-#ifdef GC_DEBUG
-	  current_p = GC_debug_object_start(current_p);
-#endif
           GC_mark_stack_top_reg =
               (*PROC(descr))
               	    (current_p, GC_mark_stack_top_reg,