Menu
▾
▴
[Sbcl-devel] Failed AVER on amd64
|
From: Robert J. M. <sf-...@ro...> - 2007-04-10 16:02:10
|
Got this today while compiling cl-ppcre with sbcl 1.0.4.55 on amd64.
Here's the error and the full backtrace:
debugger invoked on a SB-INT:BUG in thread #<THREAD "initial thread"
{10023D0F71}>:
failed AVER: "(SC-IS TN ANY-REG DESCRIPTOR-REG CHARACTER-REG ...)"
[snip "probably a bug in SBCL" text and standard debugger stuff]
(SB-INT:BUG "~@<failed AVER: ~2I~_~S~:>")
0] backtrace
0: (SB-INT:BUG "~@<failed AVER: ~2I~_~S~:>")
1: (SB-IMPL::%FAILED-AVER "(SC-IS TN ANY-REG DESCRIPTOR-REG
CHARACTER-REG ...)")
2: (SB-IMPL::%FAILED-AVER "(SC-IS TN ANY-REG DESCRIPTOR-REG
CHARACTER-REG ...)")
3: (SB-VM::MAKE-DWORD-TN #<SB-C:TN t1[S4]>)
4: ((LAMBDA (SB-C::.VOP.))
#<SB-C::VOP
:INFO SB-VM::MOVE-TO-CHARACTER
:ARGS #<SB-C:TN-REF
:TN #<SB-C:TN t2[S4]>
:WRITE-P NIL
:VOP SB-VM::MOVE-TO-CHARACTER>
:RESULTS #<SB-C:TN-REF
:TN #<SB-C:TN t1[S4]>
:WRITE-P T
:VOP SB-VM::MOVE-TO-CHARACTER>>)
5: (SB-C::GENERATE-CODE
#<SB-C:COMPONENT :NAME (SB-C::XEP (LAMBDA (START-POS)))
{100324A741}>)
6: (SB-C::%COMPILE-COMPONENT
#<SB-C:COMPONENT :NAME (SB-C::XEP (LAMBDA (START-POS)))
{100324A741}>)
7: (SB-C::COMPILE-COMPONENT
#<SB-C:COMPONENT :NAME (SB-C::XEP (LAMBDA (START-POS)))
{100324A741}>)
8: (SB-C::%COMPILE
(SB-INT:NAMED-LAMBDA
(SB-PCL::FAST-METHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
(REPETITION T))
(SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. REPETITION NEXT-FN)
(DECLARE (IGNORABLE SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL.)
(SB-EXT:DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
(DECLARE
(OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1)
(COMPILATION-SPEED 0)))
(DECLARE (SB-PCL::%METHOD-LAMBDA-LIST (REPETITION REPETITION)
NEXT-FN))
(DECLARE
(SB-PCL::%METHOD-NAME
(CREATE-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T))))
(DECLARE (TYPE T NEXT-FN)) (DECLARE (IGNORABLE NEXT-FN
REPETITION))
(SYMBOL-MACROLET ((SB-PCL::PV-ENV-ENVIRONMENT SB-PCL::DEFAULT))
(SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
((REPETITION NEXT-FN) SB-PCL::.NEXT-METHOD-CALL. (REPETITION
NEXT-FN)
NIL :CALL-NEXT-METHOD-P NIL :NEXT-METHOD-P-P NIL :SETQ-P NIL
:METHOD-NAME-DECLARATION (#) ...)
(DECLARE (SB-PCL::%CLASS REPETITION REPETITION))
(LOCALLY
(DECLARE #)
(SYMBOL-MACROLET #
#
#)))))
#<SB-FASL:FASL-OUTPUT
"/home/robertm/sbcl/packages/cl-ppcre/cl-ppcre-1.3.0/repetition-closures.fasl">)
9: (SB-C::FOPCOMPILE-FUNCTION
(SB-INT:NAMED-LAMBDA
(SB-PCL::FAST-METHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
(REPETITION T))
(SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. REPETITION NEXT-FN)
(DECLARE (IGNORABLE SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL.)
(SB-EXT:DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
(DECLARE
(OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1)
(COMPILATION-SPEED 0)))
(DECLARE (SB-PCL::%METHOD-LAMBDA-LIST (REPETITION REPETITION)
NEXT-FN))
(DECLARE
(SB-PCL::%METHOD-NAME
(CREATE-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T))))
(DECLARE (TYPE T NEXT-FN)) (DECLARE (IGNORABLE NEXT-FN
REPETITION))
(SYMBOL-MACROLET ((SB-PCL::PV-ENV-ENVIRONMENT SB-PCL::DEFAULT))
(SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
((REPETITION NEXT-FN) SB-PCL::.NEXT-METHOD-CALL. (REPETITION
NEXT-FN)
NIL :CALL-NEXT-METHOD-P NIL :NEXT-METHOD-P-P NIL :SETQ-P NIL
:METHOD-NAME-DECLARATION (#) ...)
(DECLARE (SB-PCL::%CLASS REPETITION REPETITION))
(LOCALLY
(DECLARE #)
(SYMBOL-MACROLET #
#
#)))))
((SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* (# #)
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF #)
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO #)))
(SB-C:SOURCE-LOCATION))
(PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* #
#
SB-PCL::MF)
'(SB-PCL::PLIST #))
(SB-C:SOURCE-LOCATION)))
SB-C::ORIGINAL-SOURCE-START 0 5)
T)
10: (SB-C::FOPCOMPILE
(LET* ((SB-PCL::FMF
(SB-INT:NAMED-LAMBDA
(SB-PCL::FAST-METHOD
CREATE-GREEDY-CONSTANT-LENGTH-MATCHER #)
(SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. REPETITION
NEXT-FN)
(DECLARE # #) (DECLARE #) (DECLARE #) (DECLARE #)
(DECLARE #)
(DECLARE #)
(SYMBOL-MACROLET #
#)))
(SB-PCL::MF (SB-PCL::%MAKE-METHOD-FUNCTION SB-PCL::FMF
NIL)))
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION SB-PCL::MF
(SB-PCL::METHOD-FUNCTION-FROM-FAST-FUNCTION
SB-PCL::FMF
'(:ARG-INFO (2))))
SB-PCL::MF)
((SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* (# #)
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF #)
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO #)))
(SB-C:SOURCE-LOCATION))
(PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* #
#
SB-PCL::MF)
'(SB-PCL::PLIST #))
(SB-C:SOURCE-LOCATION)))
SB-C::ORIGINAL-SOURCE-START 0 5)
T)
11: (SB-C::FOPCOMPILE
(LIST* :FUNCTION
(LET* ((SB-PCL::FMF (SB-INT:NAMED-LAMBDA # # # # # # # #
#))
(SB-PCL::MF (SB-PCL::%MAKE-METHOD-FUNCTION
SB-PCL::FMF NIL)))
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION SB-PCL::MF
(SB-PCL::METHOD-FUNCTION-FROM-FAST-FUNCTION
SB-PCL::FMF
'(:ARG-INFO
#)))
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO (2))))
((SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* (# #)
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF #)
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO #)))
(SB-C:SOURCE-LOCATION))
(PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* #
#
SB-PCL::MF)
'(SB-PCL::PLIST #))
(SB-C:SOURCE-LOCATION)))
SB-C::ORIGINAL-SOURCE-START 0 5)
T)
12: (SB-C::FOPCOMPILE
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* ((SB-PCL::FMF #) (SB-PCL::MF
#))
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF
(SB-PCL::METHOD-FUNCTION-FROM-FAST-FUNCTION
SB-PCL::FMF '#))
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO (2))))
(SB-C:SOURCE-LOCATION))
((SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* (# #)
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF #)
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO #)))
(SB-C:SOURCE-LOCATION))
(PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* #
#
SB-PCL::MF)
'(SB-PCL::PLIST #))
(SB-C:SOURCE-LOCATION)))
SB-C::ORIGINAL-SOURCE-START 0 5)
NIL)
13: (SB-C::CONVERT-AND-MAYBE-COMPILE
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* ((SB-PCL::FMF #) (SB-PCL::MF
#))
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF
(SB-PCL::METHOD-FUNCTION-FROM-FAST-FUNCTION
SB-PCL::FMF '#))
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO (2))))
(SB-C:SOURCE-LOCATION))
((SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* (# #)
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF #)
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO #)))
(SB-C:SOURCE-LOCATION))
(PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* #
#
SB-PCL::MF)
'(SB-PCL::PLIST #))
(SB-C:SOURCE-LOCATION)))
SB-C::ORIGINAL-SOURCE-START 0 5))
14: ((FLET SB-C::DEFAULT-PROCESSOR)
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* ((SB-PCL::FMF #) (SB-PCL::MF
#))
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF
(SB-PCL::METHOD-FUNCTION-FROM-FAST-FUNCTION
SB-PCL::FMF '#))
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO (2))))
(SB-C:SOURCE-LOCATION)))
15: (SB-C::PROCESS-TOPLEVEL-FORM
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* ((SB-PCL::FMF #) (SB-PCL::MF
#))
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF
(SB-PCL::METHOD-FUNCTION-FROM-FAST-FUNCTION
SB-PCL::FMF '#))
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO (2))))
(SB-C:SOURCE-LOCATION))
((PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* #
#
SB-PCL::MF)
'(SB-PCL::PLIST #))
(SB-C:SOURCE-LOCATION)))
SB-C::ORIGINAL-SOURCE-START 0 5)
NIL)
16: (SB-C::PROCESS-TOPLEVEL-PROGN
((SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* (# #)
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF #)
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO #)))
(SB-C:SOURCE-LOCATION)))
((PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* #
#
SB-PCL::MF)
'(SB-PCL::PLIST #))
(SB-C:SOURCE-LOCATION)))
SB-C::ORIGINAL-SOURCE-START 0 5)
NIL)
17: (SB-C::PROCESS-TOPLEVEL-FORM
(PROGN
(SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
'CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
'NIL
(LIST 'REPETITION 'T) '(REPETITION
NEXT-FN)
(LIST* :FUNCTION
(LET* (# #)
(SB-MOP:SET-FUNCALLABLE-INSTANCE-FUNCTION
SB-PCL::MF #)
SB-PCL::MF)
'(SB-PCL::PLIST (:ARG-INFO #)))
(SB-C:SOURCE-LOCATION)))
(SB-C::ORIGINAL-SOURCE-START 0 5)
NIL)
18: ((FLET SB-C::DEFAULT-PROCESSOR)
(DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
((REPETITION REPETITION) NEXT-FN)
(DECLARE
(OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1)
(COMPILATION-SPEED 0)))
(LET ((LEN (LEN REPETITION))
(MAXIMUM (MAXIMUM REPETITION))
(REGEX (REGEX REPETITION))
(MIN-REST (MIN-REST REPETITION)))
(DECLARE (TYPE FIXNUM LEN MIN-REST) (TYPE FUNCTION
NEXT-FN))
(COND ((ZEROP LEN) NEXT-FN) (T (TYPECASE REGEX # # #
#))))))
19: (SB-C::PROCESS-TOPLEVEL-FORM
(DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER
((REPETITION REPETITION) NEXT-FN)
(DECLARE
(OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1)
(COMPILATION-SPEED 0)))
(LET ((LEN (LEN REPETITION))
(MAXIMUM (MAXIMUM REPETITION))
(REGEX (REGEX REPETITION))
(MIN-REST (MIN-REST REPETITION)))
(DECLARE (TYPE FIXNUM LEN MIN-REST) (TYPE FUNCTION
NEXT-FN))
(COND ((ZEROP LEN) NEXT-FN) (T (TYPECASE REGEX # # #
#)))))
(SB-C::ORIGINAL-SOURCE-START 0 5)
NIL)
20: (SB-C::SUB-SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
21: ((LAMBDA ()))
22: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA #) {10027E9679}>)
23: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
24: (COMPILE-FILE
#P"/home/robertm/sbcl/packages/cl-ppcre/cl-ppcre-1.3.0/repetition-closures.lisp")
25: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:COMPILE-OP
ASDF:CL-SOURCE-FILE))
#<unavailable argument>
#<unavailable argument>
#<ASDF:COMPILE-OP NIL {10025D0001}>
#<ASDF:CL-SOURCE-FILE "repetition-closures" {10025D07F1}>)
26: ((LAMBDA
(SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0.
SB-PCL::.ARG1.))
#<unavailable argument>
#<unavailable argument>
#<ASDF:COMPILE-OP NIL {10025D0001}>
#<ASDF:CL-SOURCE-FILE "repetition-closures" {10025D07F1}>)
27: ((LAMBDA ()))
28: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA #) {10029C3559}>)
29: (ASDF:OPERATE ASDF:LOAD-OP :CL-PPCRE)
30: (ASDF::MODULE-PROVIDE-ASDF :CL-PPCRE)
31: ((LAMBDA (#:G18)) ASDF::MODULE-PROVIDE-ASDF)
32: (SB-IMPL::%MAP-FOR-EFFECT-ARITY-1
#<CLOSURE (LAMBDA #) {1002E71C19}>
(ASDF::MODULE-PROVIDE-ASDF SB-IMPL::MODULE-PROVIDE-CONTRIB))
33: (REQUIRE :CL-PPCRE NIL)
34: (SB-INT:SIMPLE-EVAL-IN-LEXENV (REQUIRE :CL-PPCRE) #<NULL-LEXENV>)
35: (SB-EXT:INTERACTIVE-EVAL (REQUIRE :CL-PPCRE))
36: (SB-IMPL::REPL-FUN NIL)
37: (SB-IMPL::REPL-FUN NIL)
38: ((LAMBDA ()))
39: ((LAMBDA ()))
40: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA #)
{10023D6279}>)
41: (SB-IMPL::TOPLEVEL-REPL NIL)
42: (SB-IMPL::TOPLEVEL-INIT)
43: ((LABELS SB-IMPL::RESTART-LISP))
--
Robert Macomber
sf-...@ro...
|