[m-dev.] trivial diff: avoid unnecessary runtime lib code in MLDS grades

[Fergus Henderson]

Estimated hours taken: 0.1

runtime/mercury_ho_call.c:
	Add `#ifndef MR_HIGHLEVEL_CODE' around some code
	that is specific to the LLDS back-end.

Workspace: /home/pgrad/fjh/ws/hg2
Index: runtime/mercury_ho_call.c
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_ho_call.c,v
retrieving revision 1.37
diff -u -d -r1.37 mercury_ho_call.c
--- runtime/mercury_ho_call.c	2000/09/14 04:31:24	1.37
+++ runtime/mercury_ho_call.c	2000/09/19 15:21:38
@@ -22,6 +22,7 @@
 #include "mercury_imp.h"
 #include "mercury_ho_call.h"
 
+#ifndef MR_HIGHLEVEL_CODE
 static	MR_Word	MR_generic_compare(MR_TypeInfo type_info, MR_Word x, MR_Word y);
 static	MR_Word	MR_generic_unify(MR_TypeInfo type_info, MR_Word x, MR_Word y);
 
@@ -400,3 +401,5 @@
 void mercury_sys_init_call(void) {
 	call_module();
 }
+
+#endif /* not MR_HIGHLEVEL_CODE */

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
WWW: <http://www.cs.mu.oz.au/~fjh>  |  of excellence is a lethal habit"
PGP: finger fjh at 128.250.37.3        |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------