===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/gc/alloc.c,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -p -r1.7 -r1.8
--- OpenXM_contrib2/asir2000/gc/alloc.c	2002/07/24 09:44:21	1.7
+++ OpenXM_contrib2/asir2000/gc/alloc.c	2002/07/25 02:48:53	1.8
@@ -932,6 +932,9 @@ word n;
     GC_prev_heap_addr = GC_last_heap_addr;
     GC_last_heap_addr = (ptr_t)space;
     GC_add_to_heap(space, bytes);
+#if defined(VISUAL_LIB)
+	SendHeapSize();
+#endif
     return(TRUE);
 }
 
@@ -1027,6 +1030,21 @@ int kind;
     
     if (sz == 0) return(0);
 
+#if defined(VISUAL)
+	{
+#include <signal.h>
+		extern int recv_intr;
+		if ( recv_intr ) {
+			if ( recv_intr == 1 ) {
+				recv_intr = 0;
+				int_handler();
+			} else {
+				recv_intr = 0;
+				ox_usr1_handler(0);
+			}
+		}
+	}
+#endif
     while (*flh == 0) {
       ENTER_GC();
       /* Do our share of marking work */