mescc: Use core:write.
[mes.git] / scripts / mescc.mes
index 993e856546ab6daae4d5008263ab50e0ee16fce4..45b723d29ed894237c10c703f275a2303a944358 100755 (executable)
@@ -104,7 +104,7 @@ Usage: mescc.mes [OPTION]... FILE...
   (lambda (file)
     (with-input-from-file file
       (lambda ()
-        (write (c99-input->ast #:defines defines #:includes includes))))))
+        (core:write (c99-input->ast #:defines defines #:includes includes))))))
 
 (define (source->info defines includes)
   (lambda (file)