mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-08 04:05:43 -05:00
fix bug in veci32
This commit is contained in:
parent
597a6c378e
commit
29d1fd5cf3
2 changed files with 2 additions and 2 deletions
|
|
@ -23,7 +23,7 @@ let copy self =
|
||||||
else (
|
else (
|
||||||
(* copy bigarray *)
|
(* copy bigarray *)
|
||||||
let data = mk_arr_ (size self) in
|
let data = mk_arr_ (size self) in
|
||||||
A.blit self.data data;
|
A.blit (A.sub self.data 0 (size self)) data;
|
||||||
{sz=self.sz; data}
|
{sz=self.sz; data}
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -23,7 +23,7 @@ let copy self =
|
||||||
else (
|
else (
|
||||||
(* copy bigarray *)
|
(* copy bigarray *)
|
||||||
let data = mk_arr_ (size self) in
|
let data = mk_arr_ (size self) in
|
||||||
A.blit self.data data;
|
A.blit (A.sub self.data 0 (size self)) data;
|
||||||
{sz=self.sz; data}
|
{sz=self.sz; data}
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue