mescc: Use core:write.

* scripts/mescc.mes (source->ast): Use core:write.
This commit is contained in:
Jan Nieuwenhuizen 2018-04-21 23:58:37 +02:00
parent d3f962c376
commit b91e87f476
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273

View file

@ -104,7 +104,7 @@ Usage: mescc.mes [OPTION]... FILE...
(lambda (file) (lambda (file)
(with-input-from-file file (with-input-from-file file
(lambda () (lambda ()
(write (c99-input->ast #:defines defines #:includes includes)))))) (core:write (c99-input->ast #:defines defines #:includes includes))))))
(define (source->info defines includes) (define (source->info defines includes)
(lambda (file) (lambda (file)