0.7.13.17:

[sbcl.git] / BUGS

diff --git a/BUGS b/BUGS
index ca1de10..08fea20 100644 (file)
--- a/BUGS
+++ b/BUGS
@@ -1203,9 +1203,6 @@ WORKAROUND:
         (+ x 2)))
   (foo 1d0 5) => segmentation violation
 
-234:
-  (fixed in sbcl-0.7.10.36)
-
 235: "type system and inline expansion"
   a.
   (declaim (ftype (function (cons) number) acc))
@@ -1273,43 +1270,6 @@ WORKAROUND:
   compiler gets its hands on the code needing compilation from the REPL,
   it has been macroexpanded several times.
 
-239:
-  Since 0.7.0:
-  (defun foo (bit-array-2 &optional result-bit-array)
-    (declare (type (array bit) bit-array-2)
-             (type (or (array bit) (member t nil)) result-bit-array))
-    (unless (simple-bit-vector-p bit-array-2)
-      (multiple-value-call
-          (lambda (data1 start1)
-            (multiple-value-call
-                (lambda (data2 start2)
-                  (multiple-value-call
-                      (lambda (data3 start3)
-                        (declare (ignore start3))
-                        (print (list data1 data2)))
-                    (values 0 0)))
-              (values bit-array-2 0)))
-        (values 444 0))))
-
-  Then (foo (make-array 4 :element-type 'bit :adjustable t) nil)
-  must return the same value as it prints, but it returns random garbage.
-
-240:
-  "confused lexical/special warnings in MULTIPLE-VALUE-BIND"
-  (from tonyms on #lisp IRC 2003-02-25)
-  In sbcl-0.7.12.55, compiling 
-    (cl:in-package :cl-user)
-    (defvar *foo* 0)
-    (defvar *bar* 1)
-    (defun bar ()
-      (multiple-value-bind (*foo* *bar*) 'eleventy-one
-        (bletch)))
-    (defun bletch () (format t "~&*FOO*=~S *BAR*=~S" *foo* *bar*))
-    (bar)
-  gives warnings like "using the lexical binding of the symbol *FOO*"
-  even though LOADing the fasl file shows that in fact the special
-  bindings are being used.
-
 241:
   "DEFCLASS mysteriously remembers uninterned accessor names."
   (from tonyms on #lisp IRC 2003-02-25)