From c2070d9b9e6b48f5a8782621dfa383a764dacd24 Mon Sep 17 00:00:00 2001 From: Douglas Katzman Date: Sat, 5 Mar 2016 14:47:39 -0500 Subject: [PATCH] Add file omitted from previous commit. --- tests/compiler.pure.lisp | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/tests/compiler.pure.lisp b/tests/compiler.pure.lisp index 1c492d4ae..0b3038192 100644 --- a/tests/compiler.pure.lisp +++ b/tests/compiler.pure.lisp @@ -3832,10 +3832,7 @@ (with-test (:name :bug-384892) (assert (equal - ;; The assertion that BOOLEAN becomes (MEMBER T NIL) - ;; is slightly brittle, but the rest of the - ;; assertion is ok. - '(function (fixnum fixnum &key (:k1 (member t nil))) + '(function (fixnum fixnum &key (:k1 boolean)) (values (member t) &optional)) (sb-kernel:%simple-fun-type (checked-compile `(lambda (x y &key k1) -- 2.11.4.GIT