[m-rev.] diff: eliminate mode_choice.m warnings

[Simon Taylor]

On 26-Jun-2003, Zoltan Somogyi <zs at cs.mu.OZ.AU> wrote:
> tests/hard_coded/mode_choice.m:
> 	Eliminate warnings about returning constant strings as MR_String.

> Index: mode_choice.m
> ===================================================================
> RCS file: /home/mercury1/repository/tests/hard_coded/mode_choice.m,v
> retrieving revision 1.3
> @@ -57,7 +61,8 @@
>  	
>  :- pragma promise_pure(test1/3).
>  :- pragma c_code(test1(_A::in, B::out, C::out), will_not_call_mercury, "
> -	B = C = ""test1(in, out, out)"";
> +	MR_make_aligned_string_copy(B, ""test1(in, out, out)"");
> +	C = B;
>  	SUCCESS_INDICATOR = MR_TRUE;
>  ").
>  test1(_A::in, B::out, C::out) :-

It doesn't really matter for a test case, but you can use
MR_make_string_const to convert a constant string to a
MR_String without copying (in the current implementation
it just casts away const).

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