[m-dev.] diff: llds_out compile errors

[Peter Ross]

Hi,


===================================================================


Estimated hours taken: 0.25

compiler/llds_out.m:
	Fix a syntax error and a unused variable warning.



Index: llds_out.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/llds_out.m,v
retrieving revision 1.151
diff -u -r1.151 llds_out.m
--- llds_out.m	2000/09/11 08:49:37	1.151
+++ llds_out.m	2000/09/11 13:58:19
@@ -3072,7 +3072,7 @@
 output_goto(do_call_closure, _CallerLabel) -->
 	% see comment in output_call for why we use `noprof_' here
 	io__write_string("noprof_tailcall(ENTRY(mercury__do_call_closure));\n").
-output_goto(do_call_class_method, CallerLabel) -->
+output_goto(do_call_class_method, _CallerLabel) -->
 	% see comment in output_call for why we use `noprof_' here
 	io__write_string("noprof_tailcall(ENTRY(mercury__do_call_class_method));\n").
 output_goto(do_det_aditi_call, CallerLabel) -->
@@ -3137,7 +3137,7 @@
 		io__write_string("noprof_")
 	;
 		{ ProfileCall = yes }
-	},
+	),
 	(
 		{ Target = label(Label) },
 		% We really shouldn't be calling internal labels ...

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