[m-dev.] trivial diff: fix spaces in error messages

[Fergus Henderson]

Estimated hours taken: 0.25

compiler/modes.m:
	Change the format of a couple of error messages to match the
	guidelines specified in notes/coding_standards.html.

Workspace: /home/mercury0/fjh/mercury
Index: compiler/modes.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/modes.m,v
retrieving revision 1.234
diff -u -d -r1.234 modes.m
--- modes.m	1999/10/25 03:49:23	1.234
+++ modes.m	1999/10/29 05:55:35
@@ -2142,15 +2142,15 @@
 				ModuleInfo0) } 
 		->
 			prog_out__write_context(Context),
-			io__write_string(" Sorry, not impemented: `pragma "),
+			io__write_string("Sorry, not impemented: `pragma "),
 			io__write_string(EvalMethodS),
 			io__write_string("'\n"),
 			prog_out__write_context(Context),
 			io__write_string(
-"    declaration not allowed for procedure with\n"),
+			    "  declaration not allowed for procedure with\n"),
 			prog_out__write_context(Context),
 			io__write_string(
-"    partially instantiated modes.\n"), 
+			    "  partially instantiated modes.\n"), 
 			( { VerboseErrors = yes } ->
 				io__write_string(
 "	Tabling of predicates/functions with partially instantiated modes
@@ -2167,14 +2167,14 @@
 				ModuleInfo1) } 
 		->
 			prog_out__write_context(Context),
-			io__write_string(" Error: `pragma "),
+			io__write_string("Error: `pragma "),
 			io__write_string(EvalMethodS),
 			io__write_string("'\n"),
 			prog_out__write_context(Context),
 			io__write_string(
-"    declaration not allowed for procedure with\n"),
+			    "  declaration not allowed for procedure with\n"),
 			prog_out__write_context(Context),
-			io__write_string("    unique modes.\n"), 
+			io__write_string("  unique modes.\n"), 
 			( { VerboseErrors = yes } ->
 				io__write_string(
 "	Tabling of predicates/functions with unique modes is not allowed

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
WWW: <http://www.cs.mu.oz.au/~fjh>  |  of excellence is a lethal habit"
PGP: finger fjh at 128.250.37.3        |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------