summaryrefslogtreecommitdiff
path: root/compiler/InterpreterLoopsJoinCtxs.mli
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/InterpreterLoopsJoinCtxs.mli')
-rw-r--r--compiler/InterpreterLoopsJoinCtxs.mli4
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/InterpreterLoopsJoinCtxs.mli b/compiler/InterpreterLoopsJoinCtxs.mli
index bb9f14ed..e79e6a25 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,7 @@ 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
@@ -103,6 +104,7 @@ val join_ctxs : loop_id -> ids_sets -> eval_ctx -> eval_ctx -> ctx_or_update
- [ctxl]
*)
val loop_join_origin_with_continue_ctxs :
+ Meta.meta ->
config ->
loop_id ->
ids_sets ->