[m-dev.] trivial diff: remove unused stuff

Zoltan Somogyi zs at cs.mu.OZ.AU
Thu Feb 24 16:33:29 AEDT 2000


runtime/mercury_memory_handlers.c:
runtime/mercury_memory_zones.c:
	Remove unused variables and code identified by -Wunused.

Index: runtime/mercury_memory_handlers.c
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_memory_handlers.c,v
retrieving revision 1.9
diff -u -b -r1.9 mercury_memory_handlers.c
--- runtime/mercury_memory_handlers.c	1998/10/02 05:35:56	1.9
+++ runtime/mercury_memory_handlers.c	2000/02/21 09:32:01
@@ -133,7 +133,6 @@
 	return FALSE;
 #else
 	Word *    fault_addr;
-	Word *    new_zone;
 	MemoryZone *zone;
 
 	fault_addr = (Word *) addr;
Index: runtime/mercury_memory_zones.c
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_memory_zones.c,v
retrieving revision 1.8
diff -u -b -r1.8 mercury_memory_zones.c
--- runtime/mercury_memory_zones.c	1999/11/14 23:23:19	1.8
+++ runtime/mercury_memory_zones.c	2000/02/21 09:32:01
@@ -101,8 +101,6 @@
 
 #define MAX_ZONES	16
 
-static MemoryZone *zone_table = NULL;
-
 static MemoryZone *used_memory_zones = NULL;
 static MemoryZone *free_memory_zones = NULL;
 #ifdef	MR_THREAD_SAFE
@@ -183,6 +181,10 @@
 	return zone;
 }
 
+#if 0
+
+/* this function is not currently used */
+
 static void 
 unget_zone(MemoryZone *zone)
 {
@@ -211,6 +213,8 @@
 	free_memory_zones = zone;
 	MR_UNLOCK(free_memory_zones_lock, "unget_zone");
 }
+
+#endif
 
 /*
 ** successive calls to next_offset return offsets modulo the primary
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------



More information about the developers mailing list