diff options
Diffstat (limited to 'genwrite.scm')
| -rw-r--r-- | genwrite.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/genwrite.scm b/genwrite.scm index 2e4bf60..4f9105f 100644 --- a/genwrite.scm +++ b/genwrite.scm @@ -4,7 +4,7 @@ ;; Distribution restrictions: none (define genwrite:newline-str (make-string 1 #\newline)) - +;@ (define (generic-write obj display? width output) (define (read-macro? l) @@ -247,7 +247,7 @@ (wr obj 0))) ; (reverse-string-append l) = (apply string-append (reverse l)) - +;@ (define (reverse-string-append l) (define (rev-string-append l i) |