From 14ef1bd3f5a544a197c5404ca8cde6f8fa216c42 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 7 Aug 2021 12:29:36 -0700
Subject: txr: add tests for :nothrow handling process death.

* tests/007/except-3.txr: New file.

* tests/007/except-3.expected: Likewise.

* tests/007/except-4.txr: Likewise.

* tests/007/except-4.expected: Likewise.
---
 tests/007/except-3.txr | 3 +++
 1 file changed, 3 insertions(+)
 create mode 100644 tests/007/except-3.txr

(limited to 'tests/007/except-3.txr')

diff --git a/tests/007/except-3.txr b/tests/007/except-3.txr
new file mode 100644
index 00000000..b2abc04e
--- /dev/null
+++ b/tests/007/except-3.txr
@@ -0,0 +1,3 @@
+@(next (open-command "echo foo; kill $$") :nothrow)
+@a
+@(do (put-line a))
-- 
cgit v1.2.3