[m-rev.] trivial diff: add missing MR_eng_ prefixes

Fergus Henderson fjh at cs.mu.OZ.AU
Tue Nov 18 18:04:52 AEDT 2003


Estimated hours taken: 0.25
Branches: main

runtime/mercury_agc_debug.c:
	Add some missing MR_eng_ prefixes.

Workspace: /mnt/jupiter/home/jupiter/fjh/ws-jupiter/mercury
Index: runtime/mercury_agc_debug.c
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_agc_debug.c,v
retrieving revision 1.22
diff -u -d -r1.22 mercury_agc_debug.c
--- runtime/mercury_agc_debug.c	22 Oct 2003 11:05:53 -0000	1.22
+++ runtime/mercury_agc_debug.c	14 Nov 2003 15:35:02 -0000
@@ -53,8 +53,8 @@
 		MR_restore_registers();
 		MR_copy_regs_to_saved_regs(MR_MAX_FAKE_REG - 1, saved_regs);
 
-		MR_hp = MR_ENGINE(debug_heap_zone->min);
-		MR_virtual_hp = MR_ENGINE(debug_heap_zone->min);
+		MR_hp = MR_ENGINE(MR_eng_debug_heap_zone->min);
+		MR_virtual_hp = MR_ENGINE(MR_eng_debug_heap_zone->min);
 
 		fflush(NULL);
 		MR_write_variable(roots->type_info, *roots->root);
@@ -275,8 +275,8 @@
 		** Call Mercury but use the debugging heap.
 		*/
 
-		MR_hp = MR_ENGINE(debug_heap_zone->min);
-		MR_virtual_hp = MR_ENGINE(debug_heap_zone->min);
+		MR_hp = MR_ENGINE(MR_eng_debug_heap_zone->min);
+		MR_virtual_hp = MR_ENGINE(MR_eng_debug_heap_zone->min);
 
 		if (MR_get_type_and_value_base(label_layout, i,
 				current_regs, stack_pointer,
@@ -308,8 +308,8 @@
 		** Call Mercury but use the debugging heap.
 		*/
 
-		MR_hp = MR_ENGINE(debug_heap_zone->min);
-		MR_virtual_hp = MR_ENGINE(debug_heap_zone->min);
+		MR_hp = MR_ENGINE(MR_eng_debug_heap_zone->min);
+		MR_virtual_hp = MR_ENGINE(MR_eng_debug_heap_zone->min);
 
 		if (MR_get_type_and_value_base(label_layout, i,
 				current_regs, stack_pointer,

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
The University of Melbourne         |  of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh>  |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------



More information about the reviews mailing list