projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1.0.6.37: thread safety test for the CLOS cache
[sbcl.git]
/
tests
/
debug.impure.lisp
diff --git
a/tests/debug.impure.lisp
b/tests/debug.impure.lisp
index
ca2d1eb
..
2fdda62
100644
(file)
--- a/
tests/debug.impure.lisp
+++ b/
tests/debug.impure.lisp
@@
-150,7
+150,7
@@
(funcall fun)))
(with-test (:name (:undefined-function :bug-346)
(funcall fun)))
(with-test (:name (:undefined-function :bug-346)
- :fails-on '(or :alpha)) ; bug 346
+ :fails-on '(or :alpha (and :x86-64 :freebsd))) ; bug 346
(assert (verify-backtrace
(lambda () (test #'optimized))
(list *undefined-function-frame*
(assert (verify-backtrace
(lambda () (test #'optimized))
(list *undefined-function-frame*
@@
-206,7
+206,7
@@
(with-test (:name (:throw :no-such-tag)
:fails-on '(or
(with-test (:name (:throw :no-such-tag)
:fails-on '(or
- (and :x86 (or :linux :freebsd sunos))
+ (and :x86 (or :sunos))
:alpha
:mips))
(progn
:alpha
:mips))
(progn
@@
-251,7
+251,7
@@
;;; FIXME: This test really should be broken into smaller pieces
(with-test (:name (:backtrace :misc)
;;; FIXME: This test really should be broken into smaller pieces
(with-test (:name (:backtrace :misc)
- :fails-on '(and :x86 (or :linux :sunos)))
+ :fails-on '(and :x86 (or :sunos)))
(macrolet ((with-details (bool &body body)
`(let ((sb-debug:*show-entry-point-details* ,bool))
,@body)))
(macrolet ((with-details (bool &body body)
`(let ((sb-debug:*show-entry-point-details* ,bool))
,@body)))