This commit is contained in:
Justin Ethier 2017-08-11 17:34:41 +00:00
parent 6c3adfa6b8
commit 05f885660f

View file

@ -697,7 +697,8 @@
"(void *data, int argc, closure _, object k, object port)" "(void *data, int argc, closure _, object k, object port)"
" Cyc_io_read_token(data, k, port);") " Cyc_io_read_token(data, k, port);")
(read-token (open-input-file "generate-c.scm")) (write
(read-token (open-input-file "generate-c.scm")))
;; Notes on writing a fast parser: ;; Notes on writing a fast parser:
; - Interface to the user is (read). This needs to be fast ; - Interface to the user is (read). This needs to be fast