new effect system should be sound now

This commit is contained in:
Araq 2013-05-11 10:53:40 +02:00
commit adedfc3a10
3 changed files with 28 additions and 6 deletions

View file

@ -0,0 +1,14 @@
discard """
errormsg: 'type mismatch'
line: 7
"""
proc p(q: proc() ): proc() {.tags: [], raises: [], closure.} =
return proc () =
q()
let yay = p(proc () = raise newException(EIO, "IO"))
proc main() {.raises: [], tags: [].} = yay()
main()