diff options
| -rw-r--r-- | scsh-process.meta | 2 | ||||
| -rw-r--r-- | scsh-process.release-info | 1 | ||||
| -rw-r--r-- | scsh-process.scm | 18 |
3 files changed, 2 insertions, 19 deletions
diff --git a/scsh-process.meta b/scsh-process.meta index 0bda257..1dbb1be 100644 --- a/scsh-process.meta +++ b/scsh-process.meta @@ -4,5 +4,5 @@ (author "Peter Bex") (category os) (license "BSD") - ;(depends) + (depends llrb-tree) (test-depends test)) diff --git a/scsh-process.release-info b/scsh-process.release-info index 73d6ea0..4cf4e10 100644 --- a/scsh-process.release-info +++ b/scsh-process.release-info @@ -25,3 +25,4 @@ (release "1.2.2") (release "1.3.0") (release "1.4.0") +(release "1.5.0") diff --git a/scsh-process.scm b/scsh-process.scm index d6121c1..ddbc545 100644 --- a/scsh-process.scm +++ b/scsh-process.scm @@ -94,15 +94,6 @@ ;; Deprecated (define process? scsh-process?) -(define-values - (clear-scsh-pending-processes! - add-scsh-pending-process! - scsh-pending-process-ref/default - remove-scsh-pending-process! - scsh-pending-process-fold - snapshot-scsh-pending-process) - (let () - (define *scsh-pending-processes* (make-table)) (define (clear-scsh-pending-processes!) @@ -127,15 +118,6 @@ (let ((copy (table-copy *scsh-pending-processes*))) (lambda (pid) (table-ref/default copy pid #f)))) - (values - clear-scsh-pending-processes! - add-scsh-pending-process! - scsh-pending-process-ref/default - remove-scsh-pending-process! - scsh-pending-process-fold - snapshot-scsh-pending-process - ))) - (define wait #f) (let ((posix-process-wait process-wait)) |