[m-rev.] diff: fix clp(r) interface

[Fergus Henderson]

On 10-Nov-2005, Julien Fischer <juliensf at cs.mu.OZ.AU> wrote:
> 
> +++ dump.m	9 Nov 2005 23:50:33 -0000
> @@ -104,10 +104,10 @@
>  	% Unfortunately the standard same_length predicate in list.m
>  	% doesn't have this mode...
>  	%
> -:- pred same_len(list(T1)::list_ca, list(T2)::in) is semidet.
> +:- impure pred same_len(list(T1)::list_ca, list(T2)::in) is semidet.
..
>  same_len([], []).
> -same_len([_|Xs], [_|Ys]) :- same_len(Xs, Ys).
> +same_len([_|Xs], [_|Ys]) :- impure same_len(Xs, Ys).

I backed out those two changes, because they are not needed.
It's only the call to same_len from within an if-then-else that
needs "impure".

-- 
Fergus Henderson                    |  "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-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
--------------------------------------------------------------------------