Files
Nim/tests/effects/teffects4.nim
2015-06-19 01:34:34 -05:00

25 lines
347 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 =
writeLine stdout, "arg"
if true:
q()
var o: TObjB
o.fn = raiser