[m-rev.] trivial diff: agc MR_ prefixes
Fergus Henderson
fjh at cs.mu.OZ.AU
Tue Mar 5 02:17:05 AEDT 2002
Estimated hours taken: 0.1
Branches: main
runtime/mercury_agc_debug.c:
runtime/mercury_accurate_gc.c:
Add MR_ prefixes.
Workspace: /home/ceres/fjh/mercury
Index: runtime/mercury_accurate_gc.c
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_accurate_gc.c,v
retrieving revision 1.16
diff -u -d -r1.16 mercury_accurate_gc.c
--- runtime/mercury_accurate_gc.c 18 Feb 2002 07:01:13 -0000 1.16
+++ runtime/mercury_accurate_gc.c 4 Mar 2002 15:15:29 -0000
@@ -307,7 +307,7 @@
saved_success_location = &MR_based_framevar(curfr_at_signal,
number);
- saved_success = (Code *) *saved_success_location;
+ saved_success = (MR_Code *) *saved_success_location;
}
#ifdef MR_DEBUG_AGC_SCHEDULING
@@ -452,7 +452,7 @@
int short_var_count, long_var_count;
#ifdef MR_DEBUG_AGC_COLLECTION
- printlabel((Code *) (Word) label->i_addr);
+ printlabel((MR_Code *) (Word) label->i_addr);
fflush(NULL);
#endif
@@ -516,7 +516,7 @@
fatal_error("can only handle stackvars");
}
- success_ip = (Code *) MR_based_stackvar(stack_pointer, number);
+ success_ip = (MR_Code *) MR_based_stackvar(stack_pointer, number);
stack_pointer = stack_pointer -
proc_layout->MR_sle_stack_slots;
label = MR_lookup_internal_by_addr(success_ip);
Index: runtime/mercury_agc_debug.c
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_agc_debug.c,v
retrieving revision 1.18
diff -u -d -r1.18 mercury_agc_debug.c
--- runtime/mercury_agc_debug.c 18 Feb 2002 07:01:13 -0000 1.18
+++ runtime/mercury_agc_debug.c 4 Mar 2002 15:13:42 -0000
@@ -73,7 +73,7 @@
MR_agc_dump_nondet_stack_frames(MR_Internal *label, MR_MemoryZone *heap_zone,
MR_Word *stack_pointer, MR_Word *current_frame, MR_Word *max_frame)
{
- Code *success_ip;
+ MR_Code *success_ip;
int frame_size;
MR_bool registers_valid;
--
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