Skip to content

Commit c1805ea

Browse files
Merge pull request #35 from ManuelLerchner/pull-request-feedback
change refinement as requested
2 parents 4ae7ed1 + 9e5c99d commit c1805ea

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
@@ -376,8 +376,8 @@ module Enums : S with type int_t = Z.t = struct
376376
| _ -> a
377377

378378
let refine_with_bitfield ik x (z,o) =
379-
match BitfieldDomain.Bitfield.to_int (z,o) with
380-
| Some y ->
379+
match x, BitfieldDomain.Bitfield.to_int (z,o) with
380+
| Inc _, Some y ->
381381
meet ik x (Inc (BISet.singleton y))
382382
| _ ->
383383
x

0 commit comments

Comments
 (0)