Remove invalid chars

This commit is contained in:
Justin Ethier 2016-12-15 18:38:10 +00:00
parent 775e18fb21
commit 054ff5adf7

View file

@ -23,7 +23,7 @@ It is an error for the arguments not to agree with the `{formals}` of any `{clau
(define range
(case-lambda
((e) (range 0 e))
((b e) (do ((r () (cons e r))
((b e) (do ((r '() (cons e r))
(e (- e 1) (- e 1)))
((< e b) r)))))