tests/reject/teffects1.nim


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

discard """
  line: 1847
  file: "system.nim"
  errormsg: "can raise an unlisted exception: ref EIO"
"""

type
  TObj = object {.pure, inheritable.}
  TObjB = object of TObj
    a, b, c: string
  
  EIO2 = ref object of EIO
  
proc forw: int {. .}
  
proc lier(): int {.raises: [EIO2].} =
  writeln stdout, "arg"

proc forw: int =
  raise newException(EIO, "arg")