Commit 501edfb2 authored by Robert Goldman's avatar Robert Goldman
Browse files

Fix allegro-compiler-let test.

There was a cut-and-paste typo in this test.
parent d5f83a99
......@@ -1952,9 +1952,9 @@
(deftest allegro-compiler-let
(catch 'compiler-warned
((ccl:compiler-warning #'(lambda (e)
(declare (ignore e))
(throw 'compiler-warned nil))))
((warning #'(lambda (e)
(declare (ignore e))
(throw 'compiler-warned nil))))
(let ((def (compile nil '(lambda (list-xs)
(iter (for x in list-xs) (assert x () "~s is not a foo." x))))))
(when def t))))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment