(require-library srfi-13) (module input-parse (peek-next-char assert-curr-char skip-until skip-while next-token next-token-old next-token-of read-text-line read-string input-parse:init-buffer) (import scheme chicken ports srfi-13) (define ascii->char integer->char) (define char-return (ascii->char 13)) (define char-tab (ascii->char 9)) (define char-newline (ascii->char 10)) (define parser-error error) (include "myenv-chicken.scm") (include "input-parse.scm") )