Files
Nim/tests/reject/teffects4.nim
2012-11-11 22:03:41 +01:00

25 lines
345 B
Nim

discard """
line: 23
errormsg: "type mismatch"
"""
type
TObj = object {.pure, inheritable.}
TObjB = object of TObj
a, b, c: string
fn: proc (): int {.tags: [FReadIO].}
EIO2 = ref object of EIO
proc q() {.tags: [FIO].} =
nil
proc raiser(): int =
writeln stdout, "arg"
if true:
q()
var o: TObjB
o.fn = raiser