From a5f00116cc554b88968a5ba105613fcfd532af94 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?David=20B=C3=BChler?= <david.buhler@cea.fr> Date: Mon, 18 Jul 2022 20:34:55 +0200 Subject: [PATCH] [Eva] Utils: slightly improves the precision of [zone_of_expr]. --- src/plugins/eva/utils/eva_utils.ml | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/plugins/eva/utils/eva_utils.ml b/src/plugins/eva/utils/eva_utils.ml index 4f28347df9a..a1ea4f6e298 100644 --- a/src/plugins/eva/utils/eva_utils.ml +++ b/src/plugins/eva/utils/eva_utils.ml @@ -300,8 +300,7 @@ let rec zone_of_expr find_loc expr = then its contents themselves are read *) and zone_of_lval find_loc lval = let ploc = find_loc lval in - let loc = Precise_locs.imprecise_location ploc in - let zone = Locations.(enumerate_valid_bits Read loc) in + let zone = Precise_locs.enumerate_valid_bits Read ploc in Locations.Zone.join zone (indirect_zone_of_lval find_loc lval) -- GitLab