Skip to content

Commit 9e5c99d

Browse files
committed
change refinement as requestet
1 parent 090c235 commit 9e5c99d

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/cdomain/value/cdomains/int/enumsDomain.ml

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -370,8 +370,8 @@ module Enums : S with type int_t = Z.t = struct
370370
| _ -> a
371371

372372
let refine_with_bitfield ik x (z,o) =
373-
match BitfieldDomain.Bitfield.to_int (z,o) with
374-
| Some y ->
373+
match x, BitfieldDomain.Bitfield.to_int (z,o) with
374+
| Inc _, Some y ->
375375
meet ik x (Inc (BISet.singleton y))
376376
| _ ->
377377
x

0 commit comments

Comments
 (0)