tests/i/multifile-try-catch/program.cps


1
2
3
4
5
6
7
8
9
10
11
12
13


INCLUDE "middle.cps"
TRY
    CALL Outer()
CATCH
    OUTPUT "caught:", Destroyed
ENDTRY
OUTPUT "continued"
TRY
    CALL CatchHere()
    OUTPUT "returned"
CATCH
    OUTPUT "wrong handler"
ENDTRY