[m-dev.] diff: fix a bug with my change to inlining.m

[Fergus Henderson]

Estimated hours taken: 0.5

compiler/inlining.m:
	Fix a bug in my previous change: I had forgotten
	to put parentheses around the argument of `=>'.

Workspace: /home/pgrad/fjh/ws/hg
Index: compiler/inlining.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/inlining.m,v
retrieving revision 1.96
diff -u -d -r1.96 inlining.m
--- compiler/inlining.m	2001/01/10 11:15:32	1.96
+++ compiler/inlining.m	2001/01/11 07:33:25
@@ -840,9 +840,11 @@
 	module_info_globals(ModuleInfo, Globals),
 	globals__get_target(Globals, Target),
 	(
+		(
 		CalledGoal = pragma_foreign_code(ForeignAttributes,
 			_,_,_,_,_,_) - _,
 		foreign_language(ForeignAttributes, ForeignLanguage)
+		)
 	=>
 		ok_to_inline_language(ForeignLanguage, Target)
 	),

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