From: Christopher Allan Webber <cwebber@dustycloud.org>
Date: Sat, 21 Nov 2015 17:09:29 +0000 (-0600)
Subject: export port request features and kill the port-request alias
X-Git-Tag: v0.1.0~122
X-Git-Url: https://jxself.org/git/?p=8sync.git;a=commitdiff_plain;h=1b92ec2ba2bcb0aed0e519c558cd2d0a848d8701

export port request features and kill the port-request alias
---

diff --git a/loopy.scm b/loopy.scm
index 60bbe85..01c0b52 100644
--- a/loopy.scm
+++ b/loopy.scm
@@ -39,6 +39,11 @@
             make-run-request run-request?
             run-request-proc run-request-when
 
+            <port-request>
+            make-port-request port-request?
+            port-request-port
+            port-request-read port-request-write port-request-except
+
             run-it wrap run run-at run-delay
 
             %current-agenda
@@ -375,8 +380,6 @@ Will produce (0 . 0) instead of a negative number, if needed."
       (throw 'no-port-handler-given "No port handler given.\n"))
   (make-port-request-intern port read write except))
 
-(define port-request make-port-request)
-
 
 
 ;;; Asynchronous escape to run things