From 035c6be3fe0453c72f52c30914bbd008a743399c Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Sun, 26 Feb 2006 02:32:06 +0000 Subject: [PATCH] New sbcl compiler failure (type prop test on structure accessor). --- ansi-tests/misc.lsp | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp index 46f63760..b140a927 100644 --- a/ansi-tests/misc.lsp +++ b/ansi-tests/misc.lsp @@ -11201,3 +11201,19 @@ Broken at C::WT-MAKE-CLOSURE. (not (not (logbitp 0 (floor 2147483651 (min -23 0)))))))) t) +;;; sbcl 0.9.9.35 +;;; The value #S(MISC-629 :A 1 :B 3) is not of type SB-KERNEL:INSTANCE. + +(defstruct misc-629 a b) + +(deftest misc.629 + (let* ((s (make-misc-629 :a 1 :b 3)) + (form `(lambda (x) + (declare (optimize (speed 1) (safety 3) (debug 0) (space 2)) + (type (member 0 2 ,s) x)) + (misc-629-a x)))) + (funcall (compile nil form) s)) + 1) + + + -- GitLab