Commit 5e6e13eb authored by pfdietz's avatar pfdietz

And also labels.4

parent 65b1d49d
......@@ -24,10 +24,11 @@
;;; the local function declaration
(deftest labels.4
(block %f
(labels ((%f (&optional (x (return-from %f 10)))
20))
(%f)))
10)
(labels ((%f (&optional (x (return-from %f :good)))
nil))
(%f)
:bad))
:good)
(deftest labels.5
(labels ((%f () (return-from %f 15) 35))
......
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