10 files changed, 24 insertions, 0 deletions
diff --git a/tests/019/data/a b/tests/019/data/a
new file mode 100755
index 00000000..8fbed4f6
--- /dev/null
+++ b/tests/019/data/a
@@ -0,0 +1,3 @@
+@(output)
+a
+@(end)
diff --git a/tests/019/data/a.tl b/tests/019/data/a.tl
new file mode 100755
index 00000000..6f25fed5
--- /dev/null
+++ b/tests/019/data/a.tl
@@ -0,0 +1 @@
+(put-line "a.tl")
diff --git a/tests/019/data/a.tlo b/tests/019/data/a.tlo
new file mode 100755
index 00000000..40f39e81
--- /dev/null
+++ b/tests/019/data/a.tlo
@@ -0,0 +1,2 @@
+(7 0 nil)
+((2 3 #b'0200012000000004 02000010' #("a.tlo") #(usr:put-line)))
diff --git a/tests/019/data/a.txr b/tests/019/data/a.txr
new file mode 100755
index 00000000..ceab552d
--- /dev/null
+++ b/tests/019/data/a.txr
@@ -0,0 +1,3 @@
+@(output)
+a.txr
+@(end)
diff --git a/tests/019/data/b.tl b/tests/019/data/b.tl
new file mode 100755
index 00000000..46c6dd30
--- /dev/null
+++ b/tests/019/data/b.tl
@@ -0,0 +1 @@
+(put-line "b.tl")
diff --git a/tests/019/data/b.tlo b/tests/019/data/b.tlo
new file mode 100755
index 00000000..2f432257
--- /dev/null
+++ b/tests/019/data/b.tlo
@@ -0,0 +1,2 @@
+(7 0 nil)
+((2 3 #b'0200012000000004 02000010' #("b.tlo") #(usr:put-line)))
diff --git a/tests/019/data/b.txr b/tests/019/data/b.txr
new file mode 100755
index 00000000..0b8883e0
--- /dev/null
+++ b/tests/019/data/b.txr
@@ -0,0 +1,3 @@
+@(output)
+b.txr
+@(end)
diff --git a/tests/019/data/c.tl b/tests/019/data/c.tl
new file mode 100755
index 00000000..b9e018ea
--- /dev/null
+++ b/tests/019/data/c.tl
@@ -0,0 +1 @@
+(put-line "c.tl")
diff --git a/tests/019/data/c.txr b/tests/019/data/c.txr
new file mode 100755
index 00000000..19995e8a
--- /dev/null
+++ b/tests/019/data/c.txr
@@ -0,0 +1,3 @@
+@(output)
+c.txr
+@(end)
diff --git a/tests/019/data/program.tl b/tests/019/data/program.tl
new file mode 100644
index 00000000..e97acbc5
--- /dev/null
+++ b/tests/019/data/program.tl
@@ -0,0 +1,5 @@
+(defpackage :foo (:fallback usr))
+
+(in-package :foo)
+
+(defun foo:fun ())