mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-06 11:15:31 -05:00
fix build
This commit is contained in:
parent
04440deb39
commit
8dca0ea78d
1 changed files with 2 additions and 2 deletions
|
|
@ -127,7 +127,7 @@ let rec insert_tail_ (self : _ tree) shift i (tail : _ A.t) : _ tree =
|
|||
if must_push then
|
||||
A.push a new_sub
|
||||
else
|
||||
A.set ~mut:false a idx new_sub
|
||||
A.set a idx new_sub
|
||||
in
|
||||
Node a
|
||||
|
||||
|
|
@ -167,7 +167,7 @@ let rec pop_tail_from_tree_ (self : _ tree) shift i : 'a A.t * 'a tree =
|
|||
else
|
||||
Node a
|
||||
) else
|
||||
Node (A.set ~mut:false a idx new_sub)
|
||||
Node (A.set a idx new_sub)
|
||||
in
|
||||
tail, new_tree
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue