[m-dev.] diff: compare and unify arrays in hlc grade

[Peter Ross]

I accidently submitted the following change when submitting my last
change to llds_out.m

I have changed the log message to the following using the nifty command

    cvs admin -m1.14:"`cat LOG`" mercury.c

I have since tested this change and it appears to work.


------------

Estimated hours taken: 1

runtime/mercury.c:
    Implement the compare and unify operations for arrays in the hlc
    grade.

Index: mercury.c
===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury.c,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -r1.13 -r1.14
--- mercury.c	2000/10/23 15:08:30	1.13
+++ mercury.c	2000/11/09 10:41:54	1.14
@@ -442,7 +442,7 @@
 mercury__array____Unify____array_1_0(MR_Mercury_Type_Info type_info,
 	MR_Array x, MR_Array y)
 {
-	SORRY("unify for array");
+	mercury__array__array_equal_2_p_0(type_info, x, y);
 }
 
 bool
@@ -609,7 +609,7 @@
 	MR_Mercury_Type_Info type_info, MR_Comparison_Result *result,
 	MR_Array x, MR_Array y)
 {
-	SORRY("compare for array");
+	mercury__array__array_compare_3_p_0(type_info, result, x, y);
 }
 
 void
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------