[m-dev.] diff: work-around for MLDS Alpha float bug

[Fergus Henderson]

I'll commit this one as soon as it passes bootcheck...

----------

Estimated hours taken: 0.25

runtime/mercury_conf_param.h:
	If MR_HIGHLEVEL_CODE is set, then define BOXED_FLOAT.
	(A nicer fix would be to actually implement unboxed float for
	the MLDS back-end, but this work-around will do for now.)

Workspace: /home/mercury0/fjh/mercury
Index: runtime/mercury_conf_param.h
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_conf_param.h,v
retrieving revision 1.41
diff -u -d -r1.41 mercury_conf_param.h
--- runtime/mercury_conf_param.h	2000/11/13 04:26:01	1.41
+++ runtime/mercury_conf_param.h	2000/11/17 14:43:46
@@ -218,6 +218,15 @@
 ** Settings of configuration parameters which can be passed on
 ** the command line, but which are also implied by other parameters.
 */
+
+/*
+** MR_HIGHLEVEL_CODE implies BOXED_FLOAT,
+** since unboxed float is currently not yet implemented for the MLDS back-end.
+** XXX we really ought to fix that...
+*/
+#ifdef MR_HIGHLEVEL_CODE
+  #define BOXED_FLOAT
+#endif
 
 /* MR_LOWLEVEL_DEBUG implies MR_DEBUG_GOTOS and MR_CHECK_FOR_OVERFLOW */
 #ifdef MR_LOWLEVEL_DEBUG

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