[m-rev.] for review: fix singleton variable warning problem

[Fergus Henderson]

On 01-Jun-2002, Simon Taylor <stayl at cs.mu.OZ.AU> wrote:
> Index: tests/invalid/foreign_singleton.m
> +:- pred f(int::out, io::di, io::uo) is det.
> +
> +:- pragma foreign_proc("C", f(X::out, _IO0::di, _IO::uo),
> +        [will_not_call_mercury, promise_pure], "
> +    X = 5;
> +").
> +
> +f(X) --> [].

We should also test the case where the singleton is
in the foreign_proc pragma, rather than in the Mercury code.

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
The University of Melbourne         |  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
--------------------------------------------------------------------------