[m-rev.] diff: delete old bootstrap code

[Zoltan Somogyi]

compiler/llds_out.m:
compiler/mlds_to_c.m:
	Remove obsolete bootstrap #define.

Zoltan.

Index: llds_out.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/llds_out.m,v
retrieving revision 1.189
diff -u -b -r1.189 llds_out.m
--- llds_out.m	20 Mar 2002 12:36:33 -0000	1.189
+++ llds_out.m	12 Apr 2002 08:24:03 -0000
@@ -475,8 +475,7 @@
 		"**\n",
 		"** END_OF_C_GRADE_INFO\n",
 		"*/\n",
-		"\n",
-		"#define MR_BOOTSTRAP_TYPE_CTOR_COMPACT\n"
+		"\n"
 	]).
 
 :- pred convert_bool_to_string(bool, string).
Index: mlds_to_c.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/mlds_to_c.m,v
retrieving revision 1.125
diff -u -b -r1.125 mlds_to_c.m
--- mlds_to_c.m	12 Apr 2002 01:24:08 -0000	1.125
+++ mlds_to_c.m	12 Apr 2002 08:24:31 -0000
@@ -126,8 +126,6 @@
 :- mode mlds_output_hdr_file(in, in, di, uo) is det.
 
 mlds_output_hdr_file(Indent, MLDS) -->
-	% XXX for bootstrapping
-	io__write_string("#define MR_BOOTSTRAP_TYPE_CTOR_COMPACT\n"),
 	{ MLDS = mlds(ModuleName, AllForeignCode, Imports, Defns) },
 	mlds_output_hdr_start(Indent, ModuleName), io__nl,
 	mlds_output_hdr_imports(Indent, Imports), io__nl,
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------