diff options
Diffstat (limited to 'src/boot/me/resolve.ml')
| -rw-r--r-- | src/boot/me/resolve.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/boot/me/resolve.ml b/src/boot/me/resolve.ml index bf11ad23..25eb544a 100644 --- a/src/boot/me/resolve.ml +++ b/src/boot/me/resolve.ml @@ -48,6 +48,7 @@ let stmt_collecting_visitor : Walk.visitor = let block_ids = Stack.create () in let visit_block_pre (b:Ast.block) = + htab_put cx.ctxt_all_blocks b.id b.node; Stack.push b.id block_ids; inner.Walk.visit_block_pre b in |