From ec039b63748c2a95f89c0538a843e18d3a51cdf3 Mon Sep 17 00:00:00 2001
From: Lucas Franceschino
Date: Mon, 3 Jun 2024 16:53:09 +0200
Subject: feat: basic handling for `RValue::Len`, following
 AeneasVerif/charon#209

---
 compiler/FunsAnalysis.ml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'compiler/FunsAnalysis.ml')

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
-- 
cgit v1.2.3