diff options
| author | Guillaume Boisseau | 2024-06-04 10:31:37 +0200 |
|---|---|---|
| committer | GitHub | 2024-06-04 10:31:37 +0200 |
| commit | 4a31acdff7a5dfdc26bf25ad25bb8266b790f891 (patch) | |
| tree | 06fd30cde129490abe2fb938ee5bb6ba97f81cb2 /compiler/FunsAnalysis.ml | |
| parent | 170ce1c399d3ae6b2ff9485037eae4d89e7879f2 (diff) | |
| parent | d53dcc06e69b6d607261781b4bfc09c52b737a91 (diff) | |
Merge pull request #230 from W95Psp/follow-up-charon-pr-209
Diffstat (limited to '')
| -rw-r--r-- | compiler/FunsAnalysis.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/FunsAnalysis.ml b/compiler/FunsAnalysis.ml index eadd8f8a..815c470f 100644 --- a/compiler/FunsAnalysis.ml +++ b/compiler/FunsAnalysis.ml @@ -103,7 +103,9 @@ let analyze_module (m : crate) (funs_map : fun_decl FunDeclId.Map.t) method! visit_rvalue _env rv = match rv with - | Use _ | RvRef _ | Global _ | Discriminant _ | Aggregate _ -> () + | Use _ | RvRef _ | Global _ | Discriminant _ | Aggregate _ | Len _ + -> + () | UnaryOp (uop, _) -> can_fail := unop_can_fail uop || !can_fail | BinaryOp (bop, _, _) -> can_fail := binop_can_fail bop || !can_fail |