(xdef 'dead (lambda (x) (tnil (thread-dead? x))))

From ac.scm ©