summaryrefslogtreecommitdiff
path: root/test/smt/sail_mask_5.unsat.sail
blob: 452c7f6cfb5b99ea80fd77c7c97593d265f00888 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
default Order dec

$include <prelude.sail>

$property
function prop forall 'n, 31 <= 'n <= 128. (n: int('n)) -> bool = {
  let x = sail_mask(n, 0xdeadbeef);
  if n >= 32 then
     assert(x == sail_zero_extend(0xdeadbeef, n))
  else
     assert(0b1011110101011011011111011101111 == x);
  true
}