diff options
Diffstat (limited to 'not-quite-lisp/main.scm')
| -rw-r--r-- | not-quite-lisp/main.scm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/not-quite-lisp/main.scm b/not-quite-lisp/main.scm index 2d54c54..0dd7f95 100644 --- a/not-quite-lisp/main.scm +++ b/not-quite-lisp/main.scm @@ -12,9 +12,6 @@ (loop (string-append result line "\n")))))) (define (main args) - (let ((result - (if (null? (cdr args)) - (nql (stdin-to-str) #t) - (nql (stdin-to-str) #f)))) - (display result)) + (display (nql (stdin-to-str) + (null? (cdr args)))) (newline)) |