[m-rev.] trivial diff: delete unused argument in C# impl. of ML_new_array

[Julien Fischer]

Branches: main

library/array.m:
 	Delete an unused argument from the C# implementation
 	of ML_new_array.

Julien.

Index: library/array.m
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/library/array.m,v
retrieving revision 1.186
diff -u -r1.186 array.m
--- library/array.m	24 May 2011 07:35:29 -0000	1.186
+++ library/array.m	27 May 2011 07:37:19 -0000
@@ -794,10 +794,8 @@

  :- pragma foreign_code("C#", "

-// XXX What does the fill argument do here?
-//
  public static System.Array
-ML_new_array(int Size, object Item, bool fill)
+ML_new_array(int Size, object Item)
  {
      System.Array arr;
      if (Size == 0) {
@@ -835,7 +833,7 @@
          return null;
      }
      if (arr0 == null) {
-        return ML_new_array(Size, Item, true);
+        return ML_new_array(Size, Item);
      }
      if (arr0.Length == Size) {
          return arr0;
@@ -1093,7 +1091,7 @@
      array.init_2(Size::in, Item::in, Array::array_uo),
      [will_not_call_mercury, promise_pure, thread_safe],
  "
-    Array = array.ML_new_array(Size, Item, true);
+    Array = array.ML_new_array(Size, Item);
  ").
  :- pragma foreign_proc("C#",
      array.make_empty_array(Array::array_uo),

--------------------------------------------------------------------------
mercury-reviews mailing list
Post messages to:       mercury-reviews at csse.unimelb.edu.au
Administrative Queries: owner-mercury-reviews at csse.unimelb.edu.au
Subscriptions:          mercury-reviews-request at csse.unimelb.edu.au
--------------------------------------------------------------------------