X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=BUGS;h=1a35b01ca9b94e367a32ed745dbef511857728f1;hb=0cff6b0b7e6f1d148586f81f620b9c86ed217caa;hp=ebccf55226c71f6ba004ef4c80a1efb3743a95fe;hpb=85a4dd1c1dd122ffdbd6417f8458941a2c21ee67;p=sbcl.git diff --git a/BUGS b/BUGS index ebccf55..1a35b01 100644 --- a/BUGS +++ b/BUGS @@ -416,6 +416,8 @@ WORKAROUND: isn't too surprising since there are many differences in stack implementation and GC conservatism between the X86 and other ports.) + (Can't reproduce on x86 linux as of 1.0.20.23 - MGL) + This is probably the same bug as 216 173: @@ -627,6 +629,8 @@ WORKAROUND: the bad VECTOR-PUSH-EXTEND frame causes GC problems, though that may not be the actual problem. (CMU CL 18c doesn't have problems with this.) + (Can't reproduce on x86 linux as of 1.0.20.22 - MGL) + This is probably the same bug as 162 235: "type system and inline expansion" @@ -1046,7 +1050,7 @@ WORKAROUND: (open "/dev/zero" :element-type '(unsigned-byte 1025)) gives an error in sbcl-0.8.10. -325: "CLOSE :ABORT T on supeseding streams" +325: "CLOSE :ABORT T on superseding streams" Closing a stream opened with :IF-EXISTS :SUPERSEDE with :ABORT T leaves no file on disk, even if one existed before opening. @@ -1511,6 +1515,8 @@ WORKAROUND: 385: (format nil "~4,1F" 0.001) => "0.00" (should be " 0.0"); (format nil "~4,1@F" 0.001) => "+.00" (should be "+0.0"). + (format nil "~E" 0.01) => "10.e-3" (should be "1.e-2"); + (format nil "~G" 0.01) => "10.e-3" (should be "1.e-2"); 386: SunOS/x86 stack exhaustion handling broken According to , the @@ -1773,13 +1779,6 @@ WORKAROUND: implementation of read circularity, using a symbol as a marker for the previously-referenced object. -415: Issues creating large arrays on x86-64/Linux and x86/Darwin - - (make-array (1- array-dimension-limit)) - - causes a GC invariant violation on x86-64/Linux, and - an unhandled SIGILL on x86/Darwin. - 416: backtrace confusion (defun foo (x) @@ -1902,3 +1901,23 @@ generally try to check returns in safe code, so we should here too.) lumps))) (setf (aref nodes 0) 2) (assert (every #'~= (apply #'concatenate 'list nodes) '(2 3 6 9))))) + +430: nested structure constructors do not stack allocate + + (defun nada (x) (declare (ignore x)) nil) + + (declaim (inline make-foo)) + (defstruct foo bar) + + (defun foo () + (let ((x (list (make-foo)))) + (declare (dynamic-extent x)) + (nada x))) + + Result of MAKE-FOO not stack allocated in FOO, because the function + HANDLE-NESTED-DYNAMIC-EXTENT-LVARS sees is not + %MAKE-STRUCTURE-INSTANCE, but no-yet-eliminated (VARARGS-ENTRY + MAKE-FOO). + +431: alien strucure redefinition doesn't work as expected + fixed in 1.0.21.29