summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2017-08-06 15:27:43 +0200
committerAndy Wingo <wingo@pobox.com>2017-08-06 15:27:43 +0200
commit539ef80203293436fef3db9dfd7af92ab5e37158 (patch)
treee5446a57a264d38b619f4d46b2e2e06483c3c0e2
parentRebase fibers on top of schedulers and tasks (diff)
downloadguile-fibers-539ef80203293436fef3db9dfd7af92ab5e37158.tar.gz
Fix typo in schedule-task-when-fd-writable
-rw-r--r--fibers/scheduler.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/fibers/scheduler.scm b/fibers/scheduler.scm
index 28a08b3..595f0c4 100644
--- a/fibers/scheduler.scm
+++ b/fibers/scheduler.scm
@@ -339,7 +339,7 @@ expressed as an epoll bitfield."
descriptor @var{fd} becomes readable."
(schedule-task-when-fd-active sched fd (logior EPOLLIN EPOLLRDHUP) task))
-(define (run-task-when-fd-writable sched fd task)
+(define (schedule-task-when-fd-writable sched fd task)
"Arrange to schedule @var{k} on @var{sched} when the file descriptor
@var{fd} becomes writable."
(schedule-task-when-fd-active sched fd EPOLLOUT task))