Browse Source

MultiArray bugfix

Simon Krajewski 12 năm trước cách đây
mục cha
commit
a552423db1
1 tập tin đã thay đổi với 2 bổ sung2 xóa
  1. 2 2
      libs/extlib/multiArray.ml

+ 2 - 2
libs/extlib/multiArray.ml

@@ -76,7 +76,7 @@ let init len f =
 		{
 			len = len;
 			arr = imake 0 0;
-			darr = Some (imake 0 len);
+			darr = Some arr;
 		}		
 	end
 
@@ -105,7 +105,7 @@ let make len e =
 		{
 			len = len;
 			arr = imake 0 0;
-			darr = Some (imake 0 len);
+			darr = Some arr;
 		}
 	end