tests/casestmt/tcaseexpr1.nim


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

discard """
  errormsg: "type mismatch: got <string> but expected 'int'"
  line: 33
  file: "tcaseexpr1.nim"

  errormsg: "not all cases are covered; missing: {C}"
  line: 27
  file: "tcaseexpr1.nim"
"""

# NOTE: This spec is wrong. Spec doesn't support multiple error
# messages. The first one is simply overridden by the second one.
# This just has never been noticed.

type
  E = enum A, B, C

proc foo(x: int): auto =
  return case x
    of 1..9: "digit"
    else: "number"

var r = foo(10)

var x = C

var t1 = case x:
  of A: "a"
  of B: "b"

var t2 = case x:
  of A: 10
  of B, C: "23"