Commit d186a78d authored by pfdietz's avatar pfdietz
Browse files

Another tests of declarations on aux variables.

parent adffd4a0
......@@ -336,6 +336,16 @@
nil))))
:good)
(deftest lambda.64
(let ((x :bad))
(declare (special x))
(flet ((%f () x))
((lambda (x &aux (y (%f)))
(declare (type t y) (special x))
y)
:good)))
:good)
;;; Tests of lambda as a macro
(deftest lambda.macro.1
......
Markdown is supported
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