From: Christopher Allan Webber <cwebber@dustycloud.org>
Date: Wed, 28 Dec 2016 16:29:58 +0000 (-0600)
Subject: agenda: Switch "yield" to "8yield" and export.
X-Git-Tag: v0.4.0~46
X-Git-Url: https://jxself.org/git/?a=commitdiff_plain;h=8cee13ea88f6852ee1f542e1f7bdb7709bfe9505;p=8sync.git

agenda: Switch "yield" to "8yield" and export.

This avoids a name collision with an existing procedure.  Plus yield was
never exported, apparently.

* 8sync/agenda.scm (8yield): Renamed from yield.
---

diff --git a/8sync/agenda.scm b/8sync/agenda.scm
index e35cd8e..0aaae25 100644
--- a/8sync/agenda.scm
+++ b/8sync/agenda.scm
@@ -49,7 +49,7 @@
             run-it wrap wrap-apply run run-at run-delay
 
             8sync
-            8sleep 8usleep
+            8sleep 8yield
             
             ;; used for introspecting the error, but a method for making
             ;; is not exposed
@@ -429,7 +429,7 @@ forge ahead in our current function!"
       (make-run-request (lambda () (kont #f)) (delayed-time secs))))))
 
 ;; Voluntarily yield execution
-(define (yield)  ; @@: should this be define-inlinable?
+(define (8yield)
   "Voluntarily yield execution to the scheduler."
   (8sync-abort-to-prompt
    (make-async-request