~evhan/chick-8

c06639584db1ecb5a4b4b1ad6d6c3bf36ae2ddc2 — Evan Hanson 1 year, 3 months ago f057e34
Handle CLI arguments consisting of multiple data as strings
1 files changed, 5 insertions(+), 1 deletions(-)

M chick-8.scm
M chick-8.scm => chick-8.scm +5 -1
@@ 55,7 55,11 @@ options:


(define (command-line-keyword-arguments)
  (map (lambda (s) (call-with-input-string s read))
  (map (lambda (s)
        (with-input-from-string s
          (lambda ()
            (let ((x (read)))
              (if (eof-object? (peek-char)) x s)))))
       (command-line-arguments)))

(define positive-integer?