tests/procvar/tprocvarmismatch.nim


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

discard """
  errormsg: "type mismatch"
  line: 17
  file: "tprocvarmismatch.nim"
"""

type
  TCallback = proc (a, b: int)

proc huh(x, y: var int) =
  x = 0
  y = x+1

proc so(c: TCallback) =
  c(2, 4)

so(huh)