[Chicken-users] ##sys#all-threads

[Joerg F. Wittenberger]

Hi,

I found ##sys#all-threads gone.  Can we have something like:

(define (##sys#all-threads)
  (append ##sys#ready-queue-head ##sys#timeout-list ##sys#fd-list))

(define (thread-list)
  (for-each
   (lambda (t) (print (thread-name t) ": " (thread-state t)))
   (##sys#all-threads)))

or any simillar debugging aid, which gives a full listing of all
threads, theire state and blocking reason, please?

Thanks

/Jörg

-- 
The worst of harm may often result from the best of intentions.