[armedbear-devel] CLOS thread safety

[David Kirkman]

On Tue, Apr 27, 2010 at 12:01 PM, Erik Huelsmann <ehuels at gmail.com> wrote:
>
> If you can get a stacktrace of the failing thread easily, yes, please!
>

Here's one from slime:
--------------------------------------

Missing slot MOP::NAME
   [Condition of type ERROR]

Restarts:
 0: [ABORT] Abort thread.

Backtrace:
  0: (#<FUNCTION {ABA511}> #<ERROR {66D0BE}> #<FUNCTION {ABA511}>)
  1: (APPLY #<FUNCTION {ABA511}> (#<ERROR {66D0BE}> #<FUNCTION {ABA511}>))
  2: (SYSTEM::RUN-HOOK SYSTEM::*INVOKE-DEBUGGER-HOOK* #<ERROR
{66D0BE}> #<FUNCTION {ABA511}>)
  3: (INVOKE-DEBUGGER #<ERROR {66D0BE}>)
  4: org.armedbear.lisp.Lisp.error(Lisp.java:356)
  5: org.armedbear.lisp.StandardObject.getInstanceSlotValue(StandardObject.java:313)
  6: org.armedbear.lisp.StandardClass.getName(StandardClass.java:122)
  7: org.armedbear.lisp.StandardObject.typep(StandardObject.java:184)
  8: org.armedbear.lisp.LispClass.typep(LispClass.java:298)
  9: org.armedbear.lisp.SlotClass.typep(SlotClass.java:80)
 10: org.armedbear.lisp.StandardClass.typep(StandardClass.java:293)
 11: org.armedbear.lisp.typep_4.execute(typep.lisp:65)
 12: org.armedbear.lisp.Symbol.execute(Symbol.java:787)
 13: org.armedbear.lisp.LispThread.execute(LispThread.java:595)
 14: org.armedbear.lisp.clos_164.execute(clos.lisp:1375)
 15: org.armedbear.lisp.Symbol.execute(Symbol.java:787)
 16: org.armedbear.lisp.LispThread.execute(LispThread.java:595)
 17: org.armedbear.lisp.clos_165.execute(clos.lisp:1386)
 18: org.armedbear.lisp.Symbol.execute(Symbol.java:787)
 19: org.armedbear.lisp.LispThread.execute(LispThread.java:595)
 20: org.armedbear.lisp.clos_525.execute(clos.lisp:2330)
 21: org.armedbear.lisp.clos_177.execute(clos.lisp:1484)
 22: org.armedbear.lisp.clos_157.execute(clos.lisp:1252)
 23: org.armedbear.lisp.StandardGenericFunction.execute(StandardGenericFunction.java:138)
 24: org.armedbear.lisp.Symbol.execute(Symbol.java:787)
 25: org.armedbear.lisp.LispThread.execute(LispThread.java:595)
 26: org.armedbear.lisp.clos_461.execute(clos.lisp:2081)
 27: org.armedbear.lisp.Symbol.execute(Symbol.java:799)
 28: org.armedbear.lisp.LispThread.execute(LispThread.java:612)
 29: org.armedbear.lisp.clos_468.execute(clos.lisp:2136)
 30: org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:101)
 31: org.armedbear.lisp.LispThread.execute(LispThread.java:578)
 32: org.armedbear.lisp.Primitives$pf_apply.execute(Primitives.java:2778)
 33: (SYSTEM::%TYPEP #<STANDARD-CLASS STANDARD-OBJECT {50B45A}>
MOP::EQL-SPECIALIZER)
 34: (MOP::METHOD-APPLICABLE-P #<STANDARD-METHOD SHARED-INITIALIZE
(STANDARD-OBJECT T) {CEBDB2}> (#<COUNTER {7F8B6}> T))
 35: (MOP::%COMPUTE-APPLICABLE-METHODS #<STANDARD-GENERIC-FUNCTION
SHARED-INITIALIZE {B1807D}> (#<COUNTER {7F8B6}> T))
 36: (COMPUTE-APPLICABLE-METHODS #<STANDARD-GENERIC-FUNCTION
SHARED-INITIALIZE {B1807D}> (#<COUNTER {7F8B6}> T))
 37: (MOP::CHECK-INITARGS #<COUNTER {7F8B6}> T NIL)
 38: (#<FUNCTION {5988BE}> #<STANDARD-CLASS COUNTER {E4FAFE}>)
 39: (APPLY #<FUNCTION {5988BE}> (#<STANDARD-CLASS COUNTER {E4FAFE}>))
 40: (#<STANDARD-GENERIC-FUNCTION MAKE-INSTANCE {B2145C}>
#<STANDARD-CLASS COUNTER {E4FAFE}>)
 41: (APPLY #<STANDARD-GENERIC-FUNCTION MAKE-INSTANCE {B2145C}>
#<STANDARD-CLASS COUNTER {E4FAFE}> NIL)
 42: (#<FUNCTION {20B1B9}> COUNTER)
 43: (APPLY #<FUNCTION {20B1B9}> (COUNTER))
 44: (#<STANDARD-GENERIC-FUNCTION MAKE-INSTANCE {B2145C}> COUNTER)
 45: (#<FUNCTION (LAMBDA ()) {7416E9}>)
 46: (THREADS::THREAD-FUNCTION-WRAPPER #<FUNCTION (LAMBDA ()) {7416E9}>)