From: Levente <lev...@gm...> - 2006-04-19 19:05:23
|
Hi, Could somebody take a look at the following class definitions? I had this strange error since 0.9.9 but as far as I can remember it was working in 0.9.8. Finally, I had some time to narrow it down and came to the following forms. Note the forward referenced class called extra-effective-slot-definition. Also surprisingly the whole problem does not exist if you remove the :dc package and use :cl-user instead. levy - there's no perfectoin (in-package :cl-user) (defpackage :dc (:use #:cl #:sb-mop)) (in-package :dc) (defclass dwim-slot-definition (standard-slot-definition) ()) (defclass dwim-direct-slot-definition (standard-direct-slot-definition dwim-slot-definition) ()) (defclass dwim-effective-slot-definition (extra-effective-slot-definition standard-effective-slot-definition dwim-slot- definition) ()) (defclass dwim-attribute-slot-definition (dwim-slot-definition) ()) (defclass dwim-attribute-effective-slot-definition (dwim-effective-slot-definition dwim-attribute-slot-definition) ()) (defclass dwim-attribute-direct-slot-definition (dwim-direct-slot-definition dwim-attribute-slot-definition) ()) (defclass extra-effective-slot-definition () ()) And here is what happens on my ubuntu 5.10 with sbcl-x86-64: levy@tsunami:~/workspace/dc$ sbcl This is SBCL 0.9.11, an implementation of ANSI Common Lisp. More information about SBCL is available at <http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * (load "1") debugger invoked on a TYPE-ERROR in thread #<THREAD "initial thread" {1002287B51}>: The value -3 is not of type (MOD 1152921504606846975). Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [ABORT] Exit debugger, returning to top level. (SB-PCL::FIND-FREE-CACHE-LINE -1 #<SB-PCL::CACHE 3 T 8 {100243C141}> (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> {10023C7271}>)) 0] |
From: Levente <lev...@gm...> - 2006-04-19 19:29:38
|
Hi, This might or might not be new, I don't remember having it before 0.9.11. It might have been already fixed even though I did not found it on the list. I guess it's quite obviously comes up in every CLOS stuff using call-next-method. The annoying warning comes up only with the declaim below, because of the call-next-method I think, otherwise it just works fine. levy - there's no perfectoin (in-package :cl-user) (declaim (optimize (debug 3) (safety 3))) (defclass alma () ()) (defclass korte (alma) ()) (defgeneric doit (object) (:method ((alma alma)) (print 1)) (:method ((korte korte)) (print 2) (call-next-method))) (doit (make-instance 'alma)) (doit (make-instance 'korte)) * levy@tsunami:~/workspace/dc$ sbcl This is SBCL 0.9.11, an implementation of ANSI Common Lisp. More information about SBCL is available at <http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * (load "3") ; in: DEFMETHOD DOIT (KORTE) ; (DEFMETHOD DOIT ((KORTE KORTE)) (PRINT 2) (CALL-NEXT-METHOD)) ; --> PROGN SB-PCL::LOAD-DEFMETHOD LIST* LOCALLY LET SB-C::STEP-VALUES ; --> MULTIPLE-VALUE-LIST MULTIPLE-VALUE-CALL LIST* LOCALLY SB-INT:NAMED-LAMBDA ; --> FUNCTION CATCH BLOCK SB-C::%WITHIN-CLEANUP MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-MACROS MACROLET ; --> SB-PCL::BIND-LEXICAL-METHOD-FUNCTIONS SB-PCL::CALL-NEXT-METHOD-BIND LET ; --> FLET CATCH BLOCK SB-C::%WITHIN-CLEANUP BLOCK ; --> SB-PCL::CALL-NEXT-METHOD-BODY IF IF ; --> SB-PCL::INVOKE-EFFECTIVE-METHOD-FUNCTION PROGN COND IF COND IF PROGN LET* ; --> WHEN COND IF PROGN SB-PCL::CLOS-SLOTS-REF BLOCK SVREF ; ==> ; (AREF (THE SIMPLE-VECTOR SB-PCL::SLOTS) SB-INT:INDEX) ; ; caught WARNING: ; Asserted type (MOD 1152921504606846975) conflicts with derived type ; (VALUES (OR FUNCTION SB-PCL::METHOD-CALL SB-PCL::FAST-METHOD-CALL) &OPTIONAL). ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; compilation unit finished ; caught 1 WARNING condition 1 2 1 T * |
From: Christophe R. <cs...@ca...> - 2006-04-19 20:02:19
|
Levente M=C3=A9sz=C3=A1ros <lev...@gm...> writes: > This might or might not be new, > > I don't remember having it before 0.9.11. > ; caught WARNING: > ; Asserted type (MOD 1152921504606846975) conflicts with derived type > ; (VALUES (OR FUNCTION SB-PCL::METHOD-CALL SB-PCL::FAST-METHOD-CALL)=20 > &OPTIONAL). > ; See also: > ; The SBCL Manual, Node "Handling of Types" It's annoying, but it's not new: I believe it's been present since approximately forever. If I recall, the problem is that the instrumentation from step conditions destroys the type inference that would otherwise delete the code that is being warned about as unreachable. Cheers, Christophe |
From: Nikodemus S. <nik...@ra...> - 2006-04-20 07:16:54
|
Christophe Rhodes <cs...@ca...> writes: > It's annoying, but it's not new: I believe it's been present since > approximately forever. If I recall, the problem is that the > instrumentation from step conditions destroys the type inference that Since this sort of thing seem to keep popping up I'm getting more and more inclined to kill my baby in the form of the step-instrumentation, using it only within the lexical scope of STEP. General caller instrumentation as we do now definitely seems like worse idea all the time. I don't have a live tree with this, but at one point I did have a tree where SB-C::%LAMBDA was the "basic" lambda, and at the point where CL:LAMBDA got turned into it it was rather easy to instrument it. All the compiler-introduced lambdas were SB-C::%LAMBDAs from the get-go, so only user (and macroexpanded) code got instrumentation. The big gain, however, was _callee_ instrumentation: O(function-points), not O(parse-tree-size) in space. If I recall correctly the reason I abandoned the tree was some collateral damange to the compiler, which was, I hope, more due to being rather hasty in implementing this, rather then some fundamental flaw. Resurrecting this (and getting it right) would be slightly more time-consuming then I can do right now, though. Cheers, -- Nikodemus Schemer: "Buddha is small, clean, and serious." Lispnik: "Buddha is big, has hairy armpits, and laughs." |
From: Nikodemus S. <nik...@ra...> - 2006-08-16 19:09:01
|
Levente Mészáros <lev...@gm...> writes: > ; caught WARNING: > ; Asserted type (MOD 1152921504606846975) conflicts with derived type > ; (VALUES (OR FUNCTION SB-PCL::METHOD-CALL SB-PCL::FAST-METHOD-CALL) > &OPTIONAL). > ; See also: > ; The SBCL Manual, Node "Handling of Types" Fixed in 0.9.15.36, thanks for the report! The overwhelming majority of other similar warnings caused by high DEBUG policies should be fixed too. If you can still get warnings using 0.9.15.36 or later, by pumping up DEBUG, please report! Cheers, -- Nikodemus Schemer: "Buddha is small, clean, and serious." Lispnik: "Buddha is big, has hairy armpits, and laughs." |
From: Christophe R. <cs...@ca...> - 2006-04-19 19:35:55
|
Levente M=C3=A9sz=C3=A1ros <lev...@gm...> writes: > I had this strange error since 0.9.9 but as far as I can remember it was = working > in 0.9.8. Finally, I had some time to narrow it down and came to the foll= owing > forms. Note the forward referenced class called extra-effective-slot-defi= nition. > Also surprisingly the whole problem does not exist if you remove the :dc = package > and use :cl-user instead. > (SB-PCL::FIND-FREE-CACHE-LINE > -1 > #<SB-PCL::CACHE 3 T 8 {100243C141}> > (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> > #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> > #<SB-PCL::WRAPPER #<STANDARD-CLASS DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINI= TION> > {10023C7271}>)) > 0] Oh, no, not again. The bad news is that this kind of thing is binary-dependent, in that the hash codes for wrappers are randomly assigned (though in one binary, at least predefined hash codes are consistent). To debug this, at the very least I'll need you to provide a full backtrace, and also probably inspects of the cache and the three wrappers you have there. Cheers, Christophe |
From: Attila L. <att...@gm...> - 2006-04-19 22:46:15
|
> > > Oh, no, not again. > > The bad news is that this kind of thing is binary-dependent, in that > the hash codes for wrappers are randomly assigned (though in one > binary, at least predefined hash codes are consistent). some more info: (levy and me are working on the same project...) if you mean sbcl binary, then the same thing happens for me on a 0.9.x(probably 11) linux x86-32 sbcl. when i've seen these -3's, sometimes it was happening only for the first time i've tried to compile/load someting. in fact if asdf had a compile/loa= d restart (as opposed to load only) then it would probably work for the secon= d try without a vm restart. i've tried to debug it when i first saw this bug, but it looks like the actual bug (or someting that triggers it) is decoupled much ealier. (as far as a lisp noob can see... :) maybe some asserts could be inserted somewhere that would help? but it's sleep time here. we'll be online tomorrow eu time for an irc/skype/vnc/whatever session if that helps. - attila (alias 101 on irc &no 'its not lisp code :) |
From: <lev...@gm...> - 2006-04-20 07:16:47
|
Ok, here are some details: * levy@tsunami:~/workspace/dc$ uname -a Linux tsunami 2.6.12-10-amd64-generic #1 Sat Mar 11 16:15:30 UTC 2006 x86_6= 4 GNU/Linux * levy@tsunami:~/workspace/dc$ sbcl --version SBCL 0.9.11 I downloaded the x86-64 binary from www.sbcl.org. My friend told me that th= e same happens with x86 backend. levy@tsunami:~/workspace/dc$ sbcl This is SBCL 0.9.11, an implementation of ANSI Common Lisp. More information about SBCL is available at < http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * (load "1") debugger invoked on a TYPE-ERROR in thread #<THREAD "initial thread" {1002287B51}>: The value -3 is not of type (MOD 1152921504606846975). Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [ABORT] Exit debugger, returning to top level. (SB-PCL::FIND-FREE-CACHE-LINE -1 #<SB-PCL::CACHE 3 T 8 {100243C141}> (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> {10023C7271}>)) 0] back 0: (SB-PCL::FIND-FREE-CACHE-LINE -1 #<SB-PCL::CACHE 3 T 8 {100243C141}> (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> {10023C7271}>)) 1: (SB-PCL::FILL-CACHE-P NIL #<SB-PCL::CACHE 3 T 8 {100243C141}> (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> {10023C7271}>) #<CLOSURE (LAMBDA #) {100243C999}>) 2: (SB-PCL::FILL-CACHE #<SB-PCL::CACHE 3 T 8 {100243C141}> (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> {10023C7271}>) #<CLOSURE (LAMBDA #) {100243C999}>) 3: ((FLET SB-PCL::ADD-CLASS-LIST) (#<STANDARD-CLASS SB-PCL::STD-CLASS> #<STANDARD-CLASS STANDARD-OBJECT> #<STANDARD-CLASS DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION>)) 4: (SB-PCL::MAKE-EMF-CACHE #<STANDARD-GENERIC-FUNCTION SLOT-BOUNDP-USING-CLASS (3)> T #<unavailable argument> NIL NIL) 5: (SB-PCL::MAKE-FINAL-CACHING-DFUN #<STANDARD-GENERIC-FUNCTION SLOT-BOUNDP-USING-CLASS (3)> NIL #<STANDARD-CLASS DWIM-EFFECTIVE-SLOT-DEFINITION>) 6: (SB-PCL::MAKE-FINAL-DFUN-INTERNAL #<STANDARD-GENERIC-FUNCTION SLOT-BOUNDP-USING-CLASS (3)> NIL) 7: ((SB-PCL::FAST-METHOD SB-PCL::UPDATE-GF-DFUN (SB-PCL::STD-CLASS T)) #<unavailable argument> #<unavailable argument> #<STANDARD-CLASS DWIM-EFFECTIVE-SLOT-DEFINITION> #<STANDARD-GENERIC-FUNCTION SLOT-BOUNDP-USING-CLASS (3)>) 8: (SB-PCL::UPDATE-GFS-OF-CLASS #<STANDARD-CLASS DWIM-EFFECTIVE-SLOT-DEFINITION>) 9: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS DWIM-EFFECTIVE-SLOT-DEFINITION> T= ) 10: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS DWIM-EFFECTIVE-SLOT-DEFINITION> T) 11: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS DWIM-EFFECTIVE-SLOT-DEFINITION> NIL) 12: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> T) 13: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> T) 14: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> NIL) 15: (SB-PCL::UPDATE-CLASS #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> NIL) 16: ((SB-PCL::FAST-METHOD SHARED-INITIALIZE :AFTER (SB-PCL::STD-CLASS T)) (#(NIL 16 5 17) . #()) #<unavailable argument> #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> (SB-PCL::SLOTS SB-PCL::DIRECT-SLOTS) (:DIRECT-SUPERCLASSES NIL :DIRECT-SLOTS NIL :DEFINITION-SOURCE #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING NIL :TOPLEVEL-FORM-NUMBER 0 :PLIST NIL))) 17: ((LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.DFUN-REST-ARG.)) #<unavailable argument> #<unavailable argument> #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> (SB-PCL::SLOTS SB-PCL::DIRECT-SLOTS) (:DIRECT-SUPERCLASSES NIL :DIRECT-SLOTS NIL :DEFINITION-SOURCE #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING NIL :TOPLEVEL-FORM-NUMBER 0 :PLIST NIL))) 18: (SB-PCL::CHANGE-CLASS-INTERNAL #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> #<STANDARD-CLASS STANDARD-CLASS> (:DIRECT-SUPERCLASSES NIL :DIRECT-SLOTS NIL :DEFINITION-SOURCE #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING NIL :TOPLEVEL-FORM-NUMBER 0 :PLIST NIL))) 19: ((SB-PCL::FAST-METHOD ENSURE-CLASS-USING-CLASS (SB-PCL::PCL-CLASS T)) #<unavailable argument> #<unavailable argument> #<STANDARD-CLASS EXTRA-EFFECTIVE-SLOT-DEFINITION> EXTRA-EFFECTIVE-SLOT-DEFINITION (:METACLASS STANDARD-CLASS :DIRECT-SUPERCLASSES NIL :DIRECT-SLOTS NIL :DEFINITION-SOURCE #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING NIL :TOPLEVEL-FORM-NUMBER 0 :PLIST NIL))) 20: (SB-PCL::REAL-LOAD-DEFCLASS EXTRA-EFFECTIVE-SLOT-DEFINITION STANDARD-CLASS NIL NIL NIL NIL NIL NIL #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING NIL :TOPLEVEL-FORM-NUMBER 0 :PLIST NIL)) 21: (SB-INT:EVAL-IN-LEXENV (LET () (SB-PCL::LOAD-DEFCLASS 'EXTRA-EFFECTIVE-SLOT-DEFINITION 'STANDARD-CLASS 'NIL (LIST) (LIST) 'NIL 'NIL 'NIL (SB-C:SOURCE-LOCATION))) #<NULL-LEXENV>) 22: (SB-INT:EVAL-IN-LEXENV (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) (LET () (SB-PCL::LOAD-DEFCLASS 'EXTRA-EFFECTIVE-SLOT-DEFINITION 'STANDARD-CLASS 'NIL (LIST) (LIST) 'NIL 'NIL 'NIL (SB-C:SOURCE-LOCATION)))) #<NULL-LEXENV>) 23: (SB-INT:EVAL-IN-LEXENV (DEFCLASS EXTRA-EFFECTIVE-SLOT-DEFINITION NIL NIL) #<NULL-LEXENV>) 24: (SB-FASL::LOAD-AS-SOURCE #<SB-SYS:FD-STREAM for "file /home/levy/workspace/dc/1.lisp" {100228ED11}> NIL NIL) 25: (SB-FASL::INTERNAL-LOAD #P" 1.lisp" #P"/home/levy/workspace/dc/1.lisp" :ERROR NIL NIL :SOURCE :DEFAULT) 26: (LOAD "1") 27: (SB-INT:EVAL-IN-LEXENV (LOAD "1") #<NULL-LEXENV>) 28: (SB-EXT:INTERACTIVE-EVAL (LOAD "1")) 29: (SB-IMPL::REPL-FUN NIL) 30: ((LAMBDA ())) 31: ((LAMBDA ())) 32: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA #) {100228A5D9}>) 33: (SB-IMPL::TOPLEVEL-REPL NIL) 34: (SB-IMPL::TOPLEVEL-INIT) 35: ((LABELS SB-IMPL::RESTART-LISP)) 0] Here is the cache object: The object is a STRUCTURE-OBJECT of type SB-PCL::CACHE. [type: SB-PCL::CACHE] -------------------- OWNER: NIL NKEYS: 3 VALUEP: T NLINES: 8 FIELD: 0 LIMIT-FN: #<FUNCTION SB-PCL::CACHING-LIMIT-FN> MASK: 28 SIZE: 33 LINE-SIZE: 4 MAX-LOCATION: 29 VECTOR: #(4 #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:FUNCALLABLE-STANDARD-CLASS> {100042F5A1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-EFFECTIVE-SLOT-DEFINITION> {1003093311}> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD SB-MOP:SLOT-BOUNDP-USING-CLASS #)> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (3)) NIL NIL NIL NIL #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-CLASS> {100042DD21}> ...) OVERFLOW: NIL Here are the wrappers: A proper list. [type: CONS] -------------------- Elements: 0: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> 1: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> 2: #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> {100302F2D1}> Wrappers in detail following the order above: The object is a STRUCTURE-OBJECT of type SB-PCL::WRAPPER. [type: SB-PCL::WRAPPER] -------------------- CLOS-HASH-0: 31228109551489790 CLOS-HASH-1: 46985462217656338 CLOS-HASH-2: 20000743595900861 CLOS-HASH-3: 127370313536502558 CLOS-HASH-4: 28885036110369589 CLOS-HASH-5: 140510769623136297 CLOS-HASH-6: 108815236714202637 CLOS-HASH-7: 89985759101252194 CLASSOID: #<SB-KERNEL:STANDARD-CLASSOID SB-PCL::STD-CLASS> INVALID: NIL INHERITS: #(#<SB-KERNEL:LAYOUT for T {1000097381}> #<SB-PCL::WRAPPER #<SB-PCL::SLOT-CLASS SB-PCL::SLOT-OBJECT> {1000461301}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:METAOBJECT> {1000461461}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:SPECIALIZER> {1000461511}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::DEFINITION-SOURCE-MIXIN> {10004615C1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::PLIST-MIXIN> {1000461671}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::DEPENDENT-UPDATE-MIXIN> {1000461721}> #<SB-PCL::WRAPPER #<STANDARD-CLASS CLASS> {10004617D1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::PCL-CLASS> {1000461881}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::SLOT-CLASS> {1000444DB1}>) DEPTHOID: -1 LENGTH: 18 INFO: NIL PURE: NIL N-UNTAGGED-SLOTS: 0 SOURCE-LOCATION: NIL INSTANCE-SLOTS-LAYOUT: (SB-PCL::%TYPE SB-PCL::SOURCE SB-PCL::PLIST SB-PCL::NAME SB-PCL::CLASS-EQ-SPECIALIZER SB-PCL::DIRECT-SUPERCLASSES SB-PCL::DIRECT-SUBCLASSES SB-PCL::DIRECT-METHODS SB-PCL::%DOCUMENTATION SB-PCL::FINALIZED-P SB-PCL::%CLASS-PRECEDENCE-LIST SB-PCL::CPL-AVAILABLE-P SB-PCL::CAN-PRECEDE-LIST SB-PCL::INCOMPATIBLE-SUPERCLASS-LIST SB-PCL::WRAPPER SB-PCL::PROTOTYPE SB-PCL::DIRECT-SLOTS SB-PCL::SLOTS) CLASS-SLOTS: NIL The object is a STRUCTURE-OBJECT of type SB-PCL::WRAPPER. [type: SB-PCL::WRAPPER] -------------------- CLOS-HASH-0: 40835168705363346 CLOS-HASH-1: 64441852793723315 CLOS-HASH-2: 79924166608955046 CLOS-HASH-3: 99308501433350255 CLOS-HASH-4: 51307797439672012 CLOS-HASH-5: 77090244087414974 CLOS-HASH-6: 6636796580270945 CLOS-HASH-7: 31454674238990997 CLASSOID: #<SB-KERNEL:STANDARD-CLASSOID STANDARD-OBJECT> INVALID: NIL INHERITS: #(#<SB-KERNEL:LAYOUT for T {1000097381}> #<SB-PCL::WRAPPER #<SB-PCL::SLOT-CLASS SB-PCL::SLOT-OBJECT> {1000461301}>) DEPTHOID: -1 LENGTH: 0 INFO: NIL PURE: NIL N-UNTAGGED-SLOTS: 0 SOURCE-LOCATION: NIL INSTANCE-SLOTS-LAYOUT: NIL CLASS-SLOTS: NIL The object is a STRUCTURE-OBJECT of type SB-PCL::WRAPPER. [type: SB-PCL::WRAPPER] -------------------- CLOS-HASH-0: 0 CLOS-HASH-1: 0 CLOS-HASH-2: 0 CLOS-HASH-3: 0 CLOS-HASH-4: 0 CLOS-HASH-5: 0 CLOS-HASH-6: 0 CLOS-HASH-7: 0 CLASSOID: #<SB-KERNEL:STANDARD-CLASSOID DC::DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> INVALID: T INHERITS: #(#<SB-KERNEL:LAYOUT for T {1000097381}> #<SB-PCL::WRAPPER #<SB-PCL::SLOT-CLASS SB-PCL::SLOT-OBJECT> {1000461301}> #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:METAOBJECT> {1000461461}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:SLOT-DEFINITION> {1000639FC1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:EFFECTIVE-SLOT-DEFINITION> {1000650B31}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:STANDARD-SLOT-DEFINITION> {1000647281}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-SLOT-DEFINITION> {1002FAB8E1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-ATTRIBUTE-SLOT-DEFINITION> {10030194C1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION> {1000445941}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::EXTRA-EFFECTIVE-SLOT-DEFINITION> {1002FEACC1}> #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-EFFECTIVE-SLOT-DEFINITION> {1002FED651}>) DEPTHOID: -1 LENGTH: 0 INFO: NIL PURE: NIL N-UNTAGGED-SLOTS: 0 SOURCE-LOCATION: NIL INSTANCE-SLOTS-LAYOUT: NIL CLASS-SLOTS: NIL Here is the rest of the cache: An array. [type: (SIMPLE-VECTOR 33)] -------------------- Dimensions: (33) Its element type is: T Total size: 33 Adjustable: NIL Contents: 0: 4 1: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:FUNCALLABLE-STANDARD-CLASS> {100042F5A1}> 2: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> 3: #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-EFFECTIVE-SLOT-DEFINITION> {1003093311}> 4: #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD SB-MOP:SLOT-BOUNDP-USING-CLASS (SB-PCL::STD-CLASS STANDARD-OBJECT SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION))> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (3)) 5: NIL 6: NIL 7: NIL 8: NIL 9: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-CLASS> {100042DD21}> 10: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> 11: #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-EFFECTIVE-SLOT-DEFINITION> {1003093311}> 12: #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD SB-MOP:SLOT-BOUNDP-USING-CLASS (SB-PCL::STD-CLASS STANDARD-OBJECT SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION))> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (3)) 13: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> 14: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> 15: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION> {1000445941}> 16: #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD SB-MOP:SLOT-BOUNDP-USING-CLASS (SB-PCL::STD-CLASS STANDARD-OBJECT SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION))> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (3)) 17: NIL 18: NIL 19: NIL 20: NIL 21: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> 22: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> 23: #<SB-PCL::WRAPPER #<STANDARD-CLASS DC::DWIM-EFFECTIVE-SLOT-DEFINITION> {1003093311}> 24: #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD SB-MOP:SLOT-BOUNDP-USING-CLASS (SB-PCL::STD-CLASS STANDARD-OBJECT SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION))> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (3)) 25: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:FUNCALLABLE-STANDARD-CLASS> {100042F5A1}> 26: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> 27: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION> {1000445941}> 28: #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD SB-MOP:SLOT-BOUNDP-USING-CLASS (SB-PCL::STD-CLASS STANDARD-OBJECT SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION))> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (3)) 29: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-CLASS> {100042DD21}> 30: #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> 31: #<SB-PCL::WRAPPER #<STANDARD-CLASS SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION> {1000445941}> 32: #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD SB-MOP:SLOT-BOUNDP-USING-CLASS (SB-PCL::STD-CLASS STANDARD-OBJECT SB-MOP:STANDARD-EFFECTIVE-SLOT-DEFINITION))> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (3)) levy - Show quoted text - On 4/19/06, Levente M=E9sz=E1ros <lev...@gm...> wrote: > > A few minutes please. > > > On 4/19/06, Christophe Rhodes <cs...@ca...> wrote: > > > > Levente M=E9sz=E1ros <lev...@gm...> writes: > > > > > I had this strange error since 0.9.9 but as far as I can remember it > > was working > > > in 0.9.8. Finally, I had some time to narrow it down and came to the > > following > > > forms. Note the forward referenced class called > > extra-effective-slot-definition. > > > Also surprisingly the whole problem does not exist if you remove the > > :dc package > > > and use :cl-user instead. > > > > > (SB-PCL::FIND-FREE-CACHE-LINE > > > -1 > > > #<SB-PCL::CACHE 3 T 8 {100243C141}> > > > (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> > > > #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> > > > #<SB-PCL::WRAPPER #<STANDARD-CLASS > > DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> > > > {10023C7271}>)) > > > 0] > > > > Oh, no, not again. > > > > The bad news is that this kind of thing is binary-dependent, in that > > the hash codes for wrappers are randomly assigned (though in one > > binary, at least predefined hash codes are consistent). > > > > To debug this, at the very least I'll need you to provide a full > > backtrace, and also probably inspects of the cache and the three > > wrappers you have there. > > > > Cheers, > > > > Christophe > > > > > > -- > There is no perfectoin > On 4/19/06, Christophe Rhodes <cs...@ca...> wrote: > > Levente M=E9sz=E1ros <lev...@gm...> writes: > > > I had this strange error since 0.9.9 but as far as I can remember it wa= s > working > > in 0.9.8. Finally, I had some time to narrow it down and came to the > following > > forms. Note the forward referenced class called > extra-effective-slot-definition. > > Also surprisingly the whole problem does not exist if you remove the :d= c > package > > and use :cl-user instead. > > > (SB-PCL::FIND-FREE-CACHE-LINE > > -1 > > #<SB-PCL::CACHE 3 T 8 {100243C141}> > > (#<SB-PCL::WRAPPER #<STANDARD-CLASS SB-PCL::STD-CLASS> {1000638E91}> > > #<SB-PCL::WRAPPER #<STANDARD-CLASS STANDARD-OBJECT> {10004613B1}> > > #<SB-PCL::WRAPPER #<STANDARD-CLASS > DWIM-ATTRIBUTE-EFFECTIVE-SLOT-DEFINITION> > > {10023C7271}>)) > > 0] > > Oh, no, not again. > > The bad news is that this kind of thing is binary-dependent, in that > the hash codes for wrappers are randomly assigned (though in one > binary, at least predefined hash codes are consistent). > > To debug this, at the very least I'll need you to provide a full > backtrace, and also probably inspects of the cache and the three > wrappers you have there. > > Cheers, > > Christophe > |
From: Christophe R. <cs...@ca...> - 2006-04-20 09:49:46
|
Levente M=E9sz=E1ros <lev...@gm...> writes: > levy@tsunami:~/workspace/dc$ sbcl > This is SBCL 0.9.11, an implementation of ANSI Common Lisp. > More information about SBCL is available at <http://www.sbcl.org/>. > > SBCL is free software, provided as is, with absolutely no warranty. > It is mostly in the public domain; some portions are provided under > BSD-style licenses. See the CREDITS and COPYING files in the > distribution for more information. > * (load "1") > > debugger invoked on a TYPE-ERROR in thread > #<THREAD "initial thread" {1002287B51}>: > The value -3 is not of type (MOD 1152921504606846975). Could you please try with no init files? If that works, could you please send me the contents of your user and system init files? Thanks, Christophe |
From: Attila L. <att...@gm...> - 2006-04-20 10:47:35
|
> > Could you please try with no init files? If that works, could you > please send me the contents of your user and system init files? uh?! just now i tried to reproduce it and i couldn't... not with my core file, nor with my standard init files, nor with "sbcl --sysinit /dev/null --userinit /dev/null" then i tried it from inside slime, our usual dev environment, and it was working there, too for a one or two sbcl restarts. and after it failed for the first time in emacs/slime, i could reproduce it with the noinit from shell. i don't know sbcl internals, but this is quite strange for me! could it be that based on the loaded dll's or something, sbcl heap is loade= d at a different address and there's some identity hash involved in this bug? due to a missing hash function identity hash is used? but i'd better stop making wild guesses... :) and the backtrace is: http://paste.lisp.org/display/19188 hope it helps, - attila (alias 101 on irc &no 'its not lisp code :) |
From: Christophe R. <cs...@ca...> - 2006-04-20 10:26:43
|
Christophe Rhodes <cs...@ca...> writes: > Levente M=E9sz=E1ros <lev...@gm...> writes: > >> levy@tsunami:~/workspace/dc$ sbcl >> This is SBCL 0.9.11, an implementation of ANSI Common Lisp. >> More information about SBCL is available at <http://www.sbcl.org/>. >> >> SBCL is free software, provided as is, with absolutely no warranty. >> It is mostly in the public domain; some portions are provided under >> BSD-style licenses. See the CREDITS and COPYING files in the >> distribution for more information. >> * (load "1") >> >> debugger invoked on a TYPE-ERROR in thread >> #<THREAD "initial thread" {1002287B51}>: >> The value -3 is not of type (MOD 1152921504606846975). > > Could you please try with no init files? If that works, could you > please send me the contents of your user and system init files? In addition, could you please try the following, before your (load "1") ? Cheers, Christophe (in-package :sb-pcl) (defun fill-cache-p (forcep cache wrappers value) (with-local-cache-functions (cache) (let ((location (compute-primary-cache-location (field) (mask) wrappers= ))) (declare (fixnum location)) (when (location-reserved-p location) (setq location (next-location location))) (let ((primary (location-line location))) (declare (fixnum location)) (multiple-value-bind (free emptyp) (find-free-cache-line primary cache wrappers) (when (or forcep emptyp) (when (not emptyp) (push (cons (line-wrappers free) (line-value free)) (cache-overflow cache))) ;;(fill-line free wrappers value) (let ((line free)) (declare (fixnum line)) (when (line-reserved-p line) (error "attempt to fill a reserved line")) (let ((loc (line-location line)) (cache-vector (vector))) (declare (fixnum loc) (simple-vector cache-vector)) (cond ((=3D (nkeys) 1) (setf (cache-vector-ref cache-vector loc) wrappers) (when (valuep) (setf (cache-vector-ref cache-vector (1+ loc)) val= ue))) (t (let ((i 0)) (declare (fixnum i)) (dolist (w wrappers) (setf (cache-vector-ref cache-vector (+ loc i)) = w) (setq i (the fixnum (1+ i))))) (when (valuep) (setf (cache-vector-ref cache-vector (+ loc (nkeys= ))) value)))) (maybe-check-cache cache))))))))) |
From: Attila L. <att...@gm...> - 2006-04-20 13:41:34
|
VGhhbmtzIHRvIENocmlzdG9waGUgUmhvZGVzIHRoaXMgYnVnIHNlZW1zIHRvIGJlIHJlc29sdmVk ISBUaGUgY29kZSBhdAp0aGUgZW5kIG9mIHRoZSBtYWlsIGhlbHBzIGlmIGFueW9uZSBpcyBzdHJ1 Z2dsaW5nIHdpdGggdGhpcy4KClRoYW5rcyBhZ2FpbiEKCi0gbGV2eSwgYXR0aWxhCgoKCihzYi1l eHQ6dW5sb2NrLXBhY2thZ2UgOnNiLXBjbCkKKGluLXBhY2thZ2UgOnNiLXBjbCkKKGRlZnVuIG1l Yy1hbGwtY2xhc3Nlcy1pbnRlcm5hbCAoc3BlYyBwcmVjb21wdXRlLXApCiAgKHVubGVzcyAoaW52 YWxpZC13cmFwcGVyLXAgKGNsYXNzLXdyYXBwZXIgKHNwZWNpYWxpemVyLWNsYXNzIHNwZWMpKSkK ICAgIChjb25zIChzcGVjaWFsaXplci1jbGFzcyBzcGVjKQogICAgICAgICAgKGFuZCAoY2xhc3Nw IHNwZWMpCiAgICAgICAgICAgICAgIHByZWNvbXB1dGUtcAogICAgICAgICAgICAgICAobm90IChv ciAoZXEgc3BlYyAqdGhlLWNsYXNzLXQqKQogICAgICAgICAgICAgICAgICAgICAgICAoZXEgc3Bl YyAqdGhlLWNsYXNzLXNsb3Qtb2JqZWN0KikKICAgICAgICAgICAgICAgICAgICAgICAgKGVxIHNw ZWMgKnRoZS1jbGFzcy1zdGFuZGFyZC1vYmplY3QqKQogICAgICAgICAgICAgICAgICAgICAgICAo ZXEgc3BlYyAqdGhlLWNsYXNzLXN0cnVjdHVyZS1vYmplY3QqKSkpCiAgICAgICAgICAgICAgIChs ZXQgKChzYyAoY2xhc3MtZGlyZWN0LXN1YmNsYXNzZXMgc3BlYykpKQogICAgICAgICAgICAgICAg ICh3aGVuIHNjCiAgICAgICAgICAgICAgICAgICAobWFwY2FuIChsYW1iZGEgKGNsYXNzKQogICAg ICAgICAgICAgICAgICAgICAgICAgICAgIChtZWMtYWxsLWNsYXNzZXMtaW50ZXJuYWwgY2xhc3Mg cHJlY29tcHV0ZS1wKSkKICAgICAgICAgICAgICAgICAgICAgICAgICAgc2MpKSkpKSkpCihkZWZ1 biB1cGRhdGUtY2xhc3MgKGNsYXNzIGZpbmFsaXplcCkKICA7OyBDb21tZW50IGZyb20gR2VyZCBN b2VsbG1hbm46CiAgOzsKICA7OyBOb3RlIHRoYXQgd2UgY2FuJ3Qgc2ltcGx5IGRlbGF5IHRoZSBm aW5hbGl6YXRpb24gd2hlbiBDTEFTUyBoYXMKICA7OyBubyBmb3J3YXJkIHJlZmVyZW5jZWQgc3Vw ZXJjbGFzc2VzIGJlY2F1c2UgdGhhdCBjYXVzZXMgYm9vdHN0cmFwCiAgOzsgcHJvYmxlbXMuCiAg KHdpdGhvdXQtcGFja2FnZS1sb2NrcwogICAod2hlbiAoYW5kIChub3QgZmluYWxpemVwKQogICAg ICAgICAgICAgIChub3QgKGNsYXNzLWZpbmFsaXplZC1wIGNsYXNzKSkKICAgICAgICAgICAgICAo bm90IChjbGFzcy1oYXMtYS1mb3J3YXJkLXJlZmVyZW5jZWQtc3VwZXJjbGFzcy1wIGNsYXNzKSkp CiAgICAgKGZpbmFsaXplLWluaGVyaXRhbmNlIGNsYXNzKQogICAgIChkb2xpc3QgKHN1YiAoY2xh c3MtZGlyZWN0LXN1YmNsYXNzZXMgY2xhc3MpKQogICAgICAgKHVwZGF0ZS1jbGFzcyBzdWIgbmls KSkKICAgICAocmV0dXJuLWZyb20gdXBkYXRlLWNsYXNzKSkKICAgKHdoZW4gKG9yIGZpbmFsaXpl cCAoY2xhc3MtZmluYWxpemVkLXAgY2xhc3MpCiAgICAgICAgICAgICAobm90IChjbGFzcy1oYXMt YS1mb3J3YXJkLXJlZmVyZW5jZWQtc3VwZXJjbGFzcy1wIGNsYXNzKSkpCiAgICAgKHNldGYgKGZp bmQtY2xhc3MgKGNsYXNzLW5hbWUgY2xhc3MpKSBjbGFzcykKICAgICAodXBkYXRlLWNwbCBjbGFz cyAoY29tcHV0ZS1jbGFzcy1wcmVjZWRlbmNlLWxpc3QgY2xhc3MpKQogICAgIDs7IFRoaXMgaW52 b2NhdGlvbiBvZiBVUERBVEUtU0xPVFMsIGluIHByYWN0aWNlLCBmaW5hbGl6ZXMgdGhlCiAgICAg OzsgY2xhc3MuICBUaGUgaG9vcHMgYWJvdmUgYXJlIHRvIGVuc3VyZSB0aGF0IEZJTkFMSVpFLUlO SEVSSVRBTkNFCiAgICAgOzsgaXMgY2FsbGVkIGF0IGZpbmFsaXphdGlvbiwgc28gdGhhdCBNT1Ag cHJvZ3JhbW1lcnMgY2FuIGhvb2sKICAgICA7OyBpbnRvIHRoZSBzeXN0ZW0gYXMgZGVzY3JpYmVk IGluICJDbGFzcyBGaW5hbGl6YXRpb24gUHJvdG9jb2wiCiAgICAgOzsgKHNlY3Rpb24gNS41LjIg b2YgQU1PUCkuCiAgICAgKHVwZGF0ZS1zbG90cyBjbGFzcyAoY29tcHV0ZS1zbG90cyBjbGFzcykp CiAgICAgKHVwZGF0ZS1nZnMtb2YtY2xhc3MgY2xhc3MpCiAgICAgKHVwZGF0ZS1pbml0YXJncyBj bGFzcyAoY29tcHV0ZS1kZWZhdWx0LWluaXRhcmdzIGNsYXNzKSkKICAgICAodXBkYXRlLWN0b3Jz ICdmaW5hbGl6ZS1pbmhlcml0YW5jZSA6Y2xhc3MgY2xhc3MpKQogICAodW5sZXNzIGZpbmFsaXpl cAogICAgIChkb2xpc3QgKHN1YiAoY2xhc3MtZGlyZWN0LXN1YmNsYXNzZXMgY2xhc3MpKQogICAg ICAgKHVwZGF0ZS1jbGFzcyBzdWIgbmlsKSkpKSkKKHNiLWV4dDpsb2NrLXBhY2thZ2UgOnNiLXBj bCkKKGluLXBhY2thZ2UgOmNsLXVzZXIpCg== |
From: Christophe R. <cs...@ca...> - 2006-04-20 14:27:16
|
Levente M=E9sz=E1ros <lev...@gm...> writes: > * (load "1") > > debugger invoked on a TYPE-ERROR in thread > #<THREAD "initial thread" {1002287B51}>: > The value -3 is not of type (MOD 1152921504606846975). OK, this should be fixed in sbcl-0.9.11.43. I'm not at all convinced that all is yet right, because in fact the function for which this cache is being produced -- slot-boundp-using-class -- shouldn't be using a cacheing discriminating function at all, as it has a specialized dfun, so please report any similar problems or followups. Cheers, Christophe |