[elephant-devel] Re: Updated version of last Postmodern patch bundle

Alex Mizrahi killerstorm at newmail.ru
Wed Mar 19 15:40:09 UTC 2008


 ??>> 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?






More information about the elephant-devel mailing list