diff --git a/alexandria-1/tests.lisp b/alexandria-1/tests.lisp index 300cd8864b483d9b8c610ca6a92eb4f3b2015d1d..6c9a4affde8b5b68c52e4f3fbed96f4bcde2d9bc 100644 --- a/alexandria-1/tests.lisp +++ b/alexandria-1/tests.lisp @@ -1614,7 +1614,8 @@ (nil t)) (deftest with-unique-names.3 - (let ((*gensym-counter* 0)) + (let ((*gensym-counter* 0) + (*error-output* (make-broadcast-stream))) (multiple-value-bind (res err) (ignore-errors (eval