??>> so we get
??>> Null store controller, default store-controller is NIL
??>>
??>> error because *store-controller* is not inherited.
LPP> Sorry, this suite isn't fully polished, yet (that's why I wanted
LPP> to have it excluded from the standard tests).
ok, but it was not excluded (probably if you do not write in-suite it
appends tests into prev suite)
and it confused me quite a lot, because i did not know where errors are
coming from.
LPP> Open a store controller before running them and it'll work.
i've made it working this way:
(let ((sc *store-controller*))
(declare (special *store-controller*))
(dotimes (batch 20)
(dotimes (i 5)
(bt:make-thread (lambda ()
(let ((*store-controller* sc))
(declare (special *store-controller*))
(dotimes (i 5)
...
or you have a better idea?
_______________________________________________
elephant-devel site list
elephant-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/elephant-devel
