diff options
| author | Son Ho | 2023-08-18 10:27:55 +0200 |
|---|---|---|
| committer | Son Ho | 2023-08-18 10:27:55 +0200 |
| commit | 26c25bf375742cf4d5a0ab160b9646e90c067f18 (patch) | |
| tree | 2b9363b5fe9fca6d1bdf154ea5fb4f21bc706e2a /compiler/InterpreterBorrows.ml | |
| parent | 316c386bcdbb66accdd65a311ca978b6d4606695 (diff) | |
Update following the introduction of ConstantExpr
Diffstat (limited to '')
| -rw-r--r-- | compiler/InterpreterBorrows.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/InterpreterBorrows.ml b/compiler/InterpreterBorrows.ml index 4d67a4e4..f908d060 100644 --- a/compiler/InterpreterBorrows.ml +++ b/compiler/InterpreterBorrows.ml @@ -452,7 +452,8 @@ let give_back_symbolic_value (_config : C.config) | V.SynthInputGivenBack | SynthRetGivenBack | FunCallGivenBack | LoopGivenBack -> () - | FunCallRet | SynthInput | Global | LoopOutput | LoopJoin | Aggregate -> + | FunCallRet | SynthInput | Global | LoopOutput | LoopJoin | Aggregate + | ConstGeneric -> raise (Failure "Unreachable")); (* Store the given-back value as a meta-value for synthesis purposes *) let mv = nsv in |