Files
Nim/tests/effects/teffects4.nim
2014-01-13 02:10:03 +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