[m-rev.] diff: remove the stop flag in collect [round )3]

[Erwan Jahier]

One more file where removing the fourth argument of filter was
necessary. 

--
Estimated hours taken: .1
branches: main.


extras/morphine/non-regression-tests/solutions:
	Remove the fourth argument of filter.Index: non-regression-tests/solutions
===================================================================
RCS file: /home/mercury1/repository/mercury/extras/morphine/non-regression-tests/solutions,v
retrieving revision 1.3
diff -u -d -u -r1.3 solutions
--- non-regression-tests/solutions	2001/07/05 08:05:36	1.3
+++ non-regression-tests/solutions	2001/08/29 15:25:17
@@ -12,7 +12,7 @@
 
 initialize([]).
 
-filter(Event, AccIn, AccOut, continue) :-
+filter(Event, AccIn, AccOut) :-
 	( 
 		port(Event) = exit,
 		not(member(sol(proc(Event), arguments(Event)), AccIn))

-- 
R1.


--------------------------------------------------------------------------
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
--------------------------------------------------------------------------