0.9.13.52: Windows installer tweaks
[sbcl.git] / tests / debug.impure.lisp
index ae18ce5..b9709f2 100644 (file)
 ;;; on that platform.
 #-(and (or ppc x86) darwin)
 (with-test (:name (trace :encapsulate nil)
-            :fails-on '(or ppc sparc))
+            :fails-on '(or :ppc :sparc :mips))
   (let ((out (with-output-to-string (*trace-output*)
                (trace trace-this :encapsulate nil)
                (assert (eq 'ok (trace-this)))
 
 #-(and (or ppc x86) darwin)
 (with-test (:name (trace-recursive :encapsulate nil)
-            :fails-on '(or ppc sparc))
+            :fails-on '(or :ppc :sparc :mips))
   (let ((out (with-output-to-string (*trace-output*)
                (trace trace-fact :encapsulate nil)
                (assert (= 120 (trace-fact 5)))