aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/case_int.elna
blob: 3a446d6068951f97f86f0a27e1f50645be291519 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
  x: Int := 2

program()
begin
  case x of
    1: assert(false)
  | 2: assert(true)
  | 3: assert(false)
  else
    assert(false)
  end
return 0u8

end.