Commit 299423c1 authored by pfdietz's avatar pfdietz

Simplified misc.631

parent eb660c1e
......@@ -11235,12 +11235,10 @@ Broken at C::WT-MAKE-CLOSURE.
;;; (SB-KERNEL:TWO-ARG-AND NIL 1)
(deftest misc.631
(if (flet ((%f17 (f17-1 f17-2 f17-3
&optional
&key (key1 0)
(key2 (if (evenp (multiple-value-prog1 0)) 0 0)))
(if (flet ((%f17 (&key (key2 (if (evenp (multiple-value-prog1 0)) 0 0)))
0))
0)
0 0)
0)
:a :b)
:a)
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