From 0c85f05e39aa0b02fed17ebf3510c16e02985965 Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Fri, 19 May 2006 12:53:37 +0000 Subject: [PATCH] Simplified misc.641 --- ansi-tests/misc.lsp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp index 6a0c774a..ecdfc939 100644 --- a/ansi-tests/misc.lsp +++ b/ansi-tests/misc.lsp @@ -11373,11 +11373,11 @@ Broken at C::WT-MAKE-CLOSURE. ;;; The value NIL is not of type SB-C::IR2-NLX-INFO. (deftest misc.641 - (let ((form '(lambda (c) + (let ((form '(lambda () ; c) (declare (optimize (speed 1) (space 0) (debug 2) (compilation-speed 0) (safety 1))) (flet ((%f3 (f3-1 &key (key1 (count (floor 0 (min -74 0)) #()))) 0)) (apply #'%f3 0 nil))))) - (funcall (compile nil form) 1)) + (funcall (compile nil form))) 0) -- GitLab