Removed pause-until-interrupt.

This commit is contained in:
mainzelm 2003-04-14 09:45:58 +00:00
parent 98df4ada7d
commit 4f84e3cb99
3 changed files with 13 additions and 5 deletions

View File

@ -186,6 +186,10 @@ We manage the project using SourceForge:
- Renamed string-filter to make-string-filter and char-filter to - Renamed string-filter to make-string-filter and char-filter to
make-char-port-filter make-char-port-filter
** API changes
pause-until-interrupt has been removed because it is not compatible
with the thread system
* New in 0.6.3 * New in 0.6.3
============== ==============

View File

@ -2560,8 +2560,15 @@ The \var{proc} and \var{prgrp} arguments are either processes
or integer process ids. or integer process ids.
\end{desc} \end{desc}
\defun{itimer}{???} \undefined \defun{itimer}{secs} \undefined
\defunx{pause-until-interrupt}{} \undefined \begin{desc}
Schedules a timer interrupt in \var{secs} seconds.
\end{desc}
\begin{note}
As the thread system needs the timer interrupt for its own purpose,
\ex{itimer} works by spawning a thread which calls the interrupt
handler for \ex{interrupt/alrm} after the specified time.
\end{note}
\defun{process-sleep}{secs} \undefined \defun{process-sleep}{secs} \undefined
\defunx{process-sleep-until}{time}\undefined \defunx{process-sleep-until}{time}\undefined

View File

@ -432,9 +432,6 @@
;;; (define-errno-syscall (signal-process-group proc-group signal) ;;; (define-errno-syscall (signal-process-group proc-group signal)
;;; signal-process-group/errno) ;;; signal-process-group/errno)
(define (pause-until-interrupt)
(next-sigevent (most-recent-sigevent) full-interrupt-set))
;;; User info ;;; User info
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;