[m-rev.] diff: fix eval method test case

Zoltan Somogyi zs at csse.unimelb.edu.au
Wed Jan 3 16:01:55 AEDT 2007


compiler/det_report.m:
	Fix the failure of a test case by using the right function to convert
	an eval_method to a pragma name.

Zoltan.

cvs diff: Diffing .
Index: det_report.m
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/compiler/det_report.m,v
retrieving revision 1.134
diff -u -b -r1.134 det_report.m
--- det_report.m	1 Dec 2006 15:03:54 -0000	1.134
+++ det_report.m	30 Dec 2006 13:32:34 -0000
@@ -254,7 +254,7 @@
         proc_info_get_context(ProcInfo0, Context),
         MainPieces =
             [words("Error: `pragma "
-                ++ eval_method_to_string(EvalMethod) ++ "'"),
+                ++ eval_method_to_pragma_name(EvalMethod) ++ "'"),
             words("declaration not allowed for procedure"),
             words("with determinism"),
             quote(determinism_to_string(InferredDetism)), suffix(".")],
cvs diff: Diffing notes
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------



More information about the reviews mailing list