parent
63af8ae53c
commit
ec5cef13cf
2 changed files with 40 additions and 1 deletions
39
tests/destructor/tgotoexceptions5.nim
Normal file
39
tests/destructor/tgotoexceptions5.nim
Normal file
|
|
@ -0,0 +1,39 @@
|
|||
discard """
|
||||
output: '''
|
||||
before
|
||||
swallowed
|
||||
before
|
||||
swallowed B
|
||||
'''
|
||||
cmd: "nim c --gc:arc --exceptions:goto $file"
|
||||
"""
|
||||
|
||||
# bug #13599
|
||||
proc main() =
|
||||
try:
|
||||
echo "before"
|
||||
raise newException(CatchableError, "foo")
|
||||
except AssertionError:
|
||||
echo "caught"
|
||||
echo "after"
|
||||
|
||||
try:
|
||||
main()
|
||||
except:
|
||||
echo "swallowed"
|
||||
|
||||
proc mainB() =
|
||||
try:
|
||||
echo "before"
|
||||
raise newException(CatchableError, "foo")
|
||||
# except CatchableError: # would work
|
||||
except AssertionError:
|
||||
echo "caught"
|
||||
except:
|
||||
raise
|
||||
echo "after"
|
||||
|
||||
try:
|
||||
mainB()
|
||||
except:
|
||||
echo "swallowed B"
|
||||
Loading…
Add table
Add a link
Reference in a new issue