full call to SB-KERNEL:%ASH/RIGHT (bug in IR2-CONVERT)
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
SBCL |
Fix Released
|
Undecided
|
Unassigned |
Bug Description
Found in an image built from repository after checkin 0176af (Fix typo from "Reduce consing in ir2opt.lisp"). Found by random testing.
(declaim (special *s1*))
(defparameter *f11*
'(lambda (b c)
(declare (type (integer -170213687166264 209287289178177) b))
(declare (type (integer -858840096 -6) c))
(declare
(optimize (space 1) (compilation-speed 3) (safety 1) (debug 1)
(speed 0)))
(catch 'ct2
(flet ((%f13
)
(flet ((%f10 (f10-1 f10-2)
(ash
(the integer
(let ((*s1*
(min 38 c)
))))))
(defun f11test ()
(let ((f11 (compile nil *f11*)))
(funcall f11 120616241449101 -686820429)))
(f11test) ==>
full call to SB-KERNEL:
This is probably a bug in SBCL itself. (Alternatively, SBCL
might have been corrupted by bad user code, e.g. by an undefined
Lisp operation like (FMAKUNBOUND 'COMPILE), or by stray pointers
from alien code or from unsafe Lisp code; or there might be a
bug in the OS or hardware that SBCL is running on.) If it seems
to be a bug in SBCL itself, the maintainers would like to know
about it. Bug reports are welcome on the SBCL mailing lists,
which you can find at <http://
[Condition of type SB-INT:BUG]
Restarts:
0: [ABORT] Exit debugger, returning to top level.
Backtrace:
0: (SB-INT:BUG "full call to ~S" SB-KERNEL:
1: (SB-C::
2: (SB-C::
3: (SB-C::
4: (SB-C:IR2-CONVERT #<SB-C:COMPONENT :NAME (SB-C::ESCAPE-FUN #:EXIT-BLOCK-0) {1006D57533}>)
5: (SB-C::
6: (SB-C::
7: (SB-C::%COMPILE (LAMBDA (B C) (DECLARE (TYPE # B)) (DECLARE (TYPE # C)) (DECLARE (OPTIMIZE # # # # #)) (CATCH (QUOTE CT2) (FLET # #))) #<SB-C::CORE-OBJECT {1006D1EC43}> :NAME NIL :PATH (SB-C::ORIGINAL..
8: ((FLET "WITHOUT-
9: (SB-THREAD:
10: ((LAMBDA NIL :IN SB-C::ACTUALLY-
11: ((FLET SB-C::WITH-IT :IN SB-C::%
12: (SB-C::
13: (SB-C:COMPILE-
14: (COMPILE NIL (LAMBDA (B C) (DECLARE (TYPE # B)) (DECLARE (TYPE # C)) (DECLARE (OPTIMIZE # # # # #)) (CATCH (QUOTE CT2) (FLET # #))))
15: (F11TEST)
[...]
Changed in sbcl: | |
status: | Fix Committed → Fix Released |
In a6a2290231310cc 848c028e24e5f3e 38533d269e.