summaryrefslogtreecommitdiff
path: root/compiler/InterpreterLoopsJoinCtxs.mli
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--compiler/InterpreterLoopsJoinCtxs.mli5
1 files changed, 4 insertions, 1 deletions
diff --git a/compiler/InterpreterLoopsJoinCtxs.mli b/compiler/InterpreterLoopsJoinCtxs.mli
index bb9f14ed..0e84657c 100644
--- a/compiler/InterpreterLoopsJoinCtxs.mli
+++ b/compiler/InterpreterLoopsJoinCtxs.mli
@@ -16,6 +16,7 @@ open InterpreterLoopsCore
- [aid1]
*)
val merge_into_abstraction :
+ Meta.meta ->
loop_id ->
abs_kind ->
bool ->
@@ -84,7 +85,8 @@ val merge_into_abstraction :
- [ctx0]
- [ctx1]
*)
-val join_ctxs : loop_id -> ids_sets -> eval_ctx -> eval_ctx -> ctx_or_update
+val join_ctxs :
+ Meta.meta -> loop_id -> ids_sets -> eval_ctx -> eval_ctx -> ctx_or_update
(** Join the context at the entry of the loop with the contexts upon reentry
(upon reaching the [Continue] statement - the goal is to compute a fixed
@@ -104,6 +106,7 @@ val join_ctxs : loop_id -> ids_sets -> eval_ctx -> eval_ctx -> ctx_or_update
*)
val loop_join_origin_with_continue_ctxs :
config ->
+ Meta.meta ->
loop_id ->
ids_sets ->
eval_ctx ->