diff options
| author | jao <jao@gnu.org> | 2022-10-15 03:33:46 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-10-15 03:33:46 +0100 |
| commit | e0e651c29daa86fefe5125c6d5256cc0bdbcc03d (patch) | |
| tree | 8b4716907c9514d98aa4b6e26246e9a9e28b74ec /src/geiser/geiser.ss | |
| parent | 4fd0a65645fda5a775f939f36e2e2cdb98f54b73 (diff) | |
| download | geiser-chez-e0e651c29daa86fefe5125c6d5256cc0bdbcc03d.tar.gz geiser-chez-e0e651c29daa86fefe5125c6d5256cc0bdbcc03d.tar.bz2 | |
little simplifications
Diffstat (limited to 'src/geiser/geiser.ss')
| -rw-r--r-- | src/geiser/geiser.ss | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/geiser/geiser.ss b/src/geiser/geiser.ss index ba5d616..e508ce2 100644 --- a/src/geiser/geiser.ss +++ b/src/geiser/geiser.ss @@ -239,9 +239,8 @@ `(("file" . ,(with-extension obj (car exts))))) (else (loop (cdr exts))))))) - (define (geiser:no-values) #f) - - (define (geiser:newline) #f) + (define geiser:no-values void) + (define geiser:newline newline) (define (geiser:macroexpand form . rest) (with-output-to-string |