diff options
Diffstat (limited to 'compiler/Interpreter.ml')
| -rw-r--r-- | compiler/Interpreter.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/Interpreter.ml b/compiler/Interpreter.ml index 4c1bc047..ec1b6260 100644 --- a/compiler/Interpreter.ml +++ b/compiler/Interpreter.ml @@ -270,8 +270,8 @@ let evaluate_function_symbolic (synthesize : bool) (* Put everything together *) S.synthesize_forward_end fwd_e back_el else None - | EndEnterLoop -> failwith "Unimplemented" - | EndContinue -> failwith "Unimplemented" + | EndEnterLoop -> raise (Failure "Unimplemented") + | EndContinue -> raise (Failure "Unimplemented") | Panic -> (* Note that as we explore all the execution branches, one of * the executions can lead to a panic *) |