Skip to content

Commit

Permalink
Disable stack exhaustion tests for the moment
Browse files Browse the repository at this point in the history
  • Loading branch information
sionescu committed Apr 5, 2016
1 parent 58b7f30 commit 3d815b9
Showing 1 changed file with 4 additions and 1 deletion.
5 changes: 4 additions & 1 deletion t/tests.lisp
Expand Up @@ -154,14 +154,17 @@
(declare (optimize (debug 3) (speed 0) (space 0) (safety 3)))
(cons 42 (stack-exhaust)))

;; Disable until we determine on which implementations it's actually safe
;; to exhaust the stack.
#|
(def-test stack-exhaust (:suite test-suite)
(stack-exhaust))
(def-test test-stack-exhaust ()
(with-test-results (results stack-exhaust)
(is (= 1 (length results)))
(is (test-failure-p (first results)))))

|#

(def-suite before-test-suite :description "Suite for before test")

Expand Down

0 comments on commit 3d815b9

Please sign in to comment.