X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fcompiler.impure.lisp;h=33936a536dab2d4183ad55ace6828723b9166839;hb=d4fb62259d04a4513d6ae20ca9f2487c4dfe1c1a;hp=67152a113e81909b4e9a2844f8b26b516404b463;hpb=befd268d09043f37545713b999850df4435170d9;p=sbcl.git

diff --git a/tests/compiler.impure.lisp b/tests/compiler.impure.lisp
index 67152a1..33936a5 100644
--- a/tests/compiler.impure.lisp
+++ b/tests/compiler.impure.lisp
@@ -893,6 +893,7 @@
 
 ;;;; MUFFLE-CONDITIONS test (corresponds to the test in the manual)
 (defvar *compiler-note-count* 0)
+#-alpha ; KLUDGE
 (handler-bind ((sb-ext:compiler-note (lambda (c)
 				       (declare (ignore c))
 				       (incf *compiler-note-count*))))