[m-rev.] diff: mercury_deep_profiling_hand.h
Zoltan Somogyi
zs at cs.mu.OZ.AU
Sat Mar 20 16:44:34 AEDT 2004
runtime/mercury_deep_profiling_hand.h:
Delete the redundant mercury__ in the names of proc_static structures,
since the compiler now generates references to them without it.
Zoltan.
cvs diff: Diffing .
Index: mercury_deep_profiling_hand.h
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/runtime/mercury_deep_profiling_hand.h,v
retrieving revision 1.4
diff -u -b -r1.4 mercury_deep_profiling_hand.h
--- mercury_deep_profiling_hand.h 3 Jul 2001 08:16:32 -0000 1.4
+++ mercury_deep_profiling_hand.h 19 Mar 2004 14:51:35 -0000
@@ -16,21 +16,21 @@
#include "mercury_deep_profiling.h"
#define MR_proc_static_user_builtin_name(name, arity, mode) \
- MR_PASTE6(mercury_data__proc_static__mercury__, \
+ MR_PASTE6(mercury_data__proc_static__, \
name, _, arity, _, mode)
#define MR_call_sites_user_builtin_name(name, arity, mode) \
MR_PASTE6(mercury_data__proc_static_call_sites__mercury__, \
name, _, arity, _, mode)
#define MR_proc_static_user_name(module, name, arity, mode) \
- MR_PASTE8(mercury_data__proc_static__mercury__, \
+ MR_PASTE8(mercury_data__proc_static__, \
module, __, name, _, arity, _, mode)
#define MR_call_sites_user_name(module, name, arity, mode) \
MR_PASTE8(mercury_data__proc_static_call_sites__mercury__, \
module, __, name, _, arity, _, mode)
#define MR_proc_static_compiler_name(module, name, type, arity, mode) \
- MR_PASTE10(mercury_data__proc_static__mercury__, \
+ MR_PASTE10(mercury_data__proc_static__, \
name, _, module, __, type, _, arity, _, mode)
#define MR_call_sites_compiler_name(module, name, type, arity, mode) \
MR_PASTE10(mercury_data__proc_static_call_sites__mercury__, \
cvs diff: Diffing GETOPT
cvs diff: Diffing machdeps
--------------------------------------------------------------------------
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