about summary refs log tree commit diff
path: root/third_party/lisp/trivial-backtrace/test
diff options
context:
space:
mode:
Diffstat (limited to 'third_party/lisp/trivial-backtrace/test')
-rw-r--r--third_party/lisp/trivial-backtrace/test/packages.lisp5
-rw-r--r--third_party/lisp/trivial-backtrace/test/test-setup.lisp4
-rw-r--r--third_party/lisp/trivial-backtrace/test/tests.lisp17
3 files changed, 0 insertions, 26 deletions
diff --git a/third_party/lisp/trivial-backtrace/test/packages.lisp b/third_party/lisp/trivial-backtrace/test/packages.lisp
deleted file mode 100644
index 7dc3eae57682..000000000000
--- a/third_party/lisp/trivial-backtrace/test/packages.lisp
+++ /dev/null
@@ -1,5 +0,0 @@
-(in-package #:common-lisp-user)
-
-(defpackage #:trivial-backtrace-test
-  (:use #:common-lisp #:lift #:trivial-backtrace))
-
diff --git a/third_party/lisp/trivial-backtrace/test/test-setup.lisp b/third_party/lisp/trivial-backtrace/test/test-setup.lisp
deleted file mode 100644
index a46b3a196649..000000000000
--- a/third_party/lisp/trivial-backtrace/test/test-setup.lisp
+++ /dev/null
@@ -1,4 +0,0 @@
-(in-package #:trivial-backtrace-test)
-
-(deftestsuite trivial-backtrace-test ()
-  ())
diff --git a/third_party/lisp/trivial-backtrace/test/tests.lisp b/third_party/lisp/trivial-backtrace/test/tests.lisp
deleted file mode 100644
index 9b32090f13e0..000000000000
--- a/third_party/lisp/trivial-backtrace/test/tests.lisp
+++ /dev/null
@@ -1,17 +0,0 @@
-(in-package #:trivial-backtrace-test)
-
-(deftestsuite generates-backtrace (trivial-backtrace-test)
-  ())
-
-(addtest (generates-backtrace)
-  test-1
-  (let ((output nil))
-    (handler-case 
-	(let ((x 1))
-	  (let ((y (- x (expt 1024 0))))
-	    (declare (optimize (safety 3)))
-	    (/ 2 y)))
-      (error (c)
-	(setf output (print-backtrace c :output nil))))
-    (ensure (stringp output))
-    (ensure (plusp (length output)))))