Function: gnus-async-get-semaphore
gnus-async-get-semaphore is a byte-compiled function defined in
gnus-async.el.gz.
Signature
(gnus-async-get-semaphore SEMAPHORE)
Documentation
Wait until SEMAPHORE is released.
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/gnus-async.el.gz
;;; Somewhat bogus semaphores.
(defun gnus-async-get-semaphore (semaphore)
"Wait until SEMAPHORE is released."
(while (/= (length (nconc (symbol-value semaphore) (list nil))) 2)
(sleep-for 1)))