diff options
| author | EuAndreh <eu@euandre.org> | 2022-05-17 15:42:47 -0300 |
|---|---|---|
| committer | EuAndreh <eu@euandre.org> | 2022-05-17 15:42:47 -0300 |
| commit | 3992015ed7b7104e879633475720ac28396d64aa (patch) | |
| tree | 8a6454cff4f79f9bfcfeb7c16b740c52e4277354 /src/xyz/euandreh/heredoc.scm | |
| parent | Update references to src/heredoc.scm (diff) | |
| download | guile-heredoc-3992015ed7b7104e879633475720ac28396d64aa.tar.gz guile-heredoc-3992015ed7b7104e879633475720ac28396d64aa.tar.xz | |
src/xyz/euandreh/heredoc.scm: Rename (heredoc-reader ...) to (reader ...)
Diffstat (limited to 'src/xyz/euandreh/heredoc.scm')
| -rw-r--r-- | src/xyz/euandreh/heredoc.scm | 2 |
1 files changed, 1 insertions, 1 deletions
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) |