blob: e0709100798bb3a8f01e7d377e8067bd4e9d5c07 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
# RUN: %kleaver %s > %t
# RUN: not grep INVALID %t
array x[4] : w32 -> w8 = symbolic
# ∀ x. x > 0 → ( x << 32 = 0 )
# Check we overshift to zero for when shifting for all 32-bit values >0
(query [ (Ult (w32 0) (ReadLSB w32 (w32 0) x)) ]
(Eq
(Shl w32
(ReadLSB w32 (w32 0) x)
(w32 32)
)
(w32 0)
) [ ] [x] )
|