From 3992015ed7b7104e879633475720ac28396d64aa Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Tue, 17 May 2022 15:42:47 -0300 Subject: src/xyz/euandreh/heredoc.scm: Rename (heredoc-reader ...) to (reader ...) --- src/xyz/euandreh/heredoc.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/xyz/euandreh/heredoc.scm') diff --git a/src/xyz/euandreh/heredoc.scm b/src/xyz/euandreh/heredoc.scm index be9408a..028e59c 100644 --- a/src/xyz/euandreh/heredoc.scm +++ b/src/xyz/euandreh/heredoc.scm @@ -56,7 +56,7 @@ chars))) (< 0 (length non-quote-chars)))) -(define (heredoc-reader _char port) +(define (reader _char port) (let ((should-trim? #f) (chars '())) (do ((curr (read-char port) -- cgit v1.2.3