[m-rev.] diff: fix unnecessary imports in interface files

[Simon Taylor]

On 08-Jan-2004, Simon Taylor <stayl at cs.mu.OZ.AU> wrote:
> 
> Estimated hours taken: 1
> Branches: main
> 
> compiler/modules.m:
> 	Fix a bug in the code to strip out unncessary import_module
> 	declarations in interface files ; it was stripping `used' and
> 	`imported' items, not `use' and `import'.
> 

Index: modules.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/modules.m,v
retrieving revision 1.285
diff -u -u -r1.285 modules.m
--- modules.m	1 Jan 2004 05:57:09 -0000	1.285
+++ modules.m	8 Jan 2004 07:29:34 -0000
@@ -7042,8 +7042,8 @@
 			(pred((ThisItem - _)::in) is semidet :-
 				\+ (
 					ThisItem = module_defn(_, Defn),
-					( Defn = imported(_)
-					; Defn = used(_)
+					( Defn = import(_)
+					; Defn = use(_)
 					)
 				)
 			), !Items)
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------