[m-dev.] trivial diff: fix comma in error message

[David Glen JEFFERY]

[ This fixes the bug that Mark reported on mercury-bugs ].

Estimated hours taken: 0.1

mercury_to_mercury.m:
	Put the comma in the right place in type_list_to_string so that
	error messages come out correctly.

cvs diff: Diffing .
Index: mercury_to_mercury.m
===================================================================
RCS file: /home/staff/zs/imp/mercury/compiler/mercury_to_mercury.m,v
retrieving revision 1.161
diff -u -t -r1.161 mercury_to_mercury.m
--- mercury_to_mercury.m	1999/09/15 16:28:29	1.161
+++ mercury_to_mercury.m	1999/10/16 05:36:25
@@ -1536,7 +1536,7 @@
 type_list_to_string_2(VarSet, [T|Ts], String) :-
         mercury_type_to_string(VarSet, T, String0),
         type_list_to_string_2(VarSet, Ts, String1),
-        string__append_list([String0, ", ", String1], String).
+        string__append_list([", ", String0, String1], String).
 
         % XXX this should probably be a little cleverer, like
         % mercury_output_term. 
cvs diff: Diffing notes


dgj
-- 
David Jeffery (dgj at cs.mu.oz.au) | If your thesis is utterly vacuous
PhD student,                    | Use first-order predicate calculus.
Dept. of Comp. Sci. & Soft. Eng.|     With sufficient formality
The University of Melbourne     |     The sheerist banality
Australia                       | Will be hailed by the critics: "Miraculous!"
                                |     -- Anon.
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------