[m-rev.] diff: fix compilation failure on aral

[Zoltan Somogyi]

trace/mercury_trace_vars.c:
	Avoid compilation problem with gcc 3.4.6 on aral.

Zoltan.

cvs diff: Diffing .
Index: mercury_trace_vars.c
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/trace/mercury_trace_vars.c,v
retrieving revision 1.75
diff -u -b -r1.75 mercury_trace_vars.c
--- mercury_trace_vars.c	22 Dec 2006 05:37:57 -0000	1.75
+++ mercury_trace_vars.c	10 Jan 2007 09:17:47 -0000
@@ -380,6 +380,9 @@
     MR_Word *base_sp, MR_Word *base_curfr, int ancestor_level,
     MR_bool print_optionals)
 {
+#ifdef  MR_HIGHLEVEL_CODE
+    return "high level code is enabled";
+#else
     const MR_ProcLayout     *entry;
     const MR_UserEvent      *user;
     MR_UserEventSpec        *user_spec;
@@ -750,6 +753,7 @@
 
     MR_point.MR_point_var_count = slot_max;
     return NULL;
+#endif
 }
 
 /*
--------------------------------------------------------------------------
mercury-reviews mailing list
Post messages to:       mercury-reviews at csse.unimelb.edu.au
Administrative Queries: owner-mercury-reviews at csse.unimelb.edu.au
Subscriptions:          mercury-reviews-request at csse.unimelb.edu.au
--------------------------------------------------------------------------