[m-rev.] diff: preparation of hlc source distribution

[Julien Fischer]

Preparation for building the source distribution in high-level C grades.

compiler/c_util.m:
 	Output whether we are using high-level code or not in the comments at
 	the head of generated .c files.

Julien.

Index: compiler/c_util.m
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/compiler/c_util.m,v
retrieving revision 1.44
diff -u -r1.44 c_util.m
--- compiler/c_util.m	14 Oct 2009 05:28:31 -0000	1.44
+++ compiler/c_util.m	19 Dec 2009 19:09:43 -0000
@@ -586,6 +586,8 @@
      string.int_to_string(NumTagBits, NumTagBitsStr),
      globals.lookup_bool_option(Globals, unboxed_float, UnboxedFloat),
      UnboxedFloatStr = convert_bool_to_string(UnboxedFloat),
+    globals.lookup_bool_option(Globals, highlevel_code, HighLevelCode),
+    HighLevelCodeStr = convert_bool_to_string(HighLevelCode),

      io.write_strings([
          "/*\n",
@@ -599,6 +601,7 @@
          "**\n",
          "** TAG_BITS=", NumTagBitsStr, "\n",
          "** UNBOXED_FLOAT=", UnboxedFloatStr, "\n",
+        "** HIGHLEVEL_CODE=", HighLevelCodeStr, "\n",
          "**\n",
          "** END_OF_C_GRADE_INFO\n",
          "*/\n",

--------------------------------------------------------------------------
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
--------------------------------------------------------------------------