Missing parenthesis in let*

This commit is contained in:
Arthur Maciel 2020-05-30 00:16:54 -03:00
parent 3d31f7ce63
commit 658317f9a9

View file

@ -94,7 +94,7 @@ Options:
(else (else
(let* ((sexp-str (apply string-append sexp-strs)) (let* ((sexp-str (apply string-append sexp-strs))
(in-port (open-input-string sexp-str)) (in-port (open-input-string sexp-str))
(sexp (cons 'begin (read-all in-port))) (sexp (cons 'begin (read-all in-port))))
(display (display
(eval sexp)) (eval sexp))
(newline) (newline)