[m-rev.] diff: some leftover array(T) => System.Array fixes.

[Tyson Dowd]

> Index: library/array.m
> ===================================================================
> RCS file: /home/mercury1/repository/mercury/library/array.m,v
> retrieving revision 1.95
> diff -u -r1.95 array.m
> --- library/array.m	2001/08/03 12:30:50	1.95
> +++ library/array.m	2001/08/08 14:47:52
> @@ -604,7 +604,7 @@
>  
>      static int
>      __Unify____array_1_0(MR_Word type_info, 
> -		MR_Word x, MR_Word y)
> +		MR_Array x, MR_Array y)
>      {
>              mercury::runtime::Errors::SORRY(""unify for array"");
>              return 0;
> @@ -612,7 +612,7 @@
>  
>      static void
>      __Compare____array_1_0(
> -            MR_Word type_info, MR_Word_Ref result, MR_Word x, MR_Word y)
> +            MR_Word type_info, MR_Word_Ref result, MR_Array x, MR_Array y)
>      {
>              mercury::runtime::Errors::SORRY(""compare for array"");
>      }

This wasn't quite right, they should be special___Compare___array_1_0
and special___Unify___array_1_0.

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