cbaines/guile-knots
1
Fork 0
Code Issues 1 Pull requests Activity Actions

Fix readable? docstring.

Browse source
This commit is contained in:
Christopher Baines 2026-03-17 21:13:03 +00:00
parent 35f4c16ab0
commit 8b489490e1
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
knots/timeout.scm
View file

@ -110,7 +110,7 @@
(exception-predicate &port-write-timeout-error)) (exception-predicate &port-write-timeout-error))
(define (readable? port) (define (readable? port)
"Test if PORT is writable." "Test if PORT is readable."
(= 1 (port-poll port "r" 0))) (= 1 (port-poll port "r" 0)))
(define (writable? port) (define (writable? port)