From 3d46727f4b73a63c788c143efb1f196c153af371 Mon Sep 17 00:00:00 2001 From: Christophe Rhodes Date: Thu, 5 Apr 2012 16:54:56 +0100 Subject: [PATCH] minor fix to alien.impure.lisp test Don't signal a compiler-note with ERROR to indicate failure; it bypasses the handlers and aborts the entire file. Use (error "bad note: ~A" note) instead --- tests/alien.impure.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/alien.impure.lisp b/tests/alien.impure.lisp index cf708ef..fe5c18e 100644 --- a/tests/alien.impure.lisp +++ b/tests/alien.impure.lisp @@ -304,7 +304,7 @@ "execv")) (values (alien-funcall sys-execv1 program argv))))) (compiler-note (n) - (error n)))) + (error "bad note: ~A" n)))) (with-test (:name :bug-721087) (assert (typep nil '(alien c-string))) -- 1.7.10.4