diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2005-09-24 08:38:45 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2005-09-24 08:38:45 +0000 |
| commit | a373f34b2a0434dcdde3954b6fbb8099a4696b57 (patch) | |
| tree | 2356631110f9573d9dddbaa9d0334b3126dee41d /otherlibs/bigarray | |
| parent | f10f5688073b2fc320e77362d705406e206cb31a (diff) | |
| download | ocaml-a373f34b2a0434dcdde3954b6fbb8099a4696b57.tar.gz | |
Bug in Array3.of_array (PR#3793)
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@7070 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/bigarray')
| -rw-r--r-- | otherlibs/bigarray/bigarray.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/otherlibs/bigarray/bigarray.ml b/otherlibs/bigarray/bigarray.ml index 30d7bb6734..e78b77b64b 100644 --- a/otherlibs/bigarray/bigarray.ml +++ b/otherlibs/bigarray/bigarray.ml @@ -188,7 +188,7 @@ module Array3 = struct if Array.length col <> dim3 then invalid_arg("Bigarray.Array3.of_array: non-cubic data"); for k = 0 to dim3 - 1 do - set ba (i + ofs) (j + ofs) (k + ofs) col.(j) + set ba (i + ofs) (j + ofs) (k + ofs) col.(k) done done done; |