X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=BUGS;h=08fea2076a380da5cfbe0a6ad535ad0613211333;hb=40bf78b47ea89b15698adb9c550efa4cbacafeb7;hp=bb197f8558447122a7bc67baa77a92d2a4e3b4b4;hpb=583e68ba34023bf5f1fdce3aa7e643fb097cc9ae;p=sbcl.git diff --git a/BUGS b/BUGS index bb197f8..08fea20 100644 --- 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,26 +1270,18 @@ 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. +241: + "DEFCLASS mysteriously remembers uninterned accessor names." + (from tonyms on #lisp IRC 2003-02-25) + In sbcl-0.7.12.55, typing + (defclass foo () ((bar :accessor foo-bar))) + (profile foo-bar) + (unintern 'foo-bar) + (defclass foo () ((bar :accessor foo-bar))) + gives the error message + "#:FOO-BAR already names an ordinary function or a macro." + So it's somehow checking the uninterned old accessor name instead + of the new requested accessor name, which seems broken to me (WHN). DEFUNCT CATEGORIES OF BUGS IR1-#: