fix(bstack): another stupid error

This commit is contained in:
Simon Cruanes 2019-02-01 21:41:54 -06:00
parent d95047b65a
commit 3eabeb4e2e

View file

@ -32,5 +32,5 @@ let pop_levels (self:_ t) (n:int) ~f : unit =
let x = Vec.pop self.vec in
f x
done;
Vec.shrink self.lvls i
Vec.shrink self.lvls new_lvl
)