diff options
Diffstat (limited to 'tests/012')
| -rw-r--r-- | tests/012/stack2.expected | 1 | ||||
| -rw-r--r-- | tests/012/stack2.txr | 8 |
2 files changed, 9 insertions, 0 deletions
diff --git a/tests/012/stack2.expected b/tests/012/stack2.expected new file mode 100644 index 00000000..cad99e12 --- /dev/null +++ b/tests/012/stack2.expected @@ -0,0 +1 @@ +caught diff --git a/tests/012/stack2.txr b/tests/012/stack2.txr new file mode 100644 index 00000000..df9e209a --- /dev/null +++ b/tests/012/stack2.txr @@ -0,0 +1,8 @@ +@(define recur ()) +@(recur) +@(end) +@(try) +@(recur) +@(catch stack-overflow (arg)) +@(do (put-line "caught")) +@(end) |