Andrew Tropin on Nostr: The best way to get all available stuff from textual port I found so far is: (define ...

The best way to get all available stuff from textual port I found so far is:
(define (read-all-chars-as-string port)
(let loop ((chars '()))
(if (char-ready? port)
(loop (cons (read-char port) chars))
(reverse-list->string chars))))

#scheme #guile #lisp