propagate enable-check-prelex-flags to separate-eval sub-process in tests

original commit: 760c3414e412ecb6708c890e32fdb8056be1e805
This commit is contained in:
Oscar Waddell 2018-05-08 14:37:03 -04:00
parent f425d8846d
commit c5e349cacb
2 changed files with 3 additions and 0 deletions

2
LOG
View File

@ -937,3 +937,5 @@
wininstall/product.wxs wininstall/product.wxs
- Use Windows path separator character when finding boot files on Windows. - Use Windows path separator character when finding boot files on Windows.
scheme.c scheme.c
- Propagate enable-check-prelex-flags to separate-eval sub-process in tests.
mats.ss

View File

@ -380,6 +380,7 @@
(open-process-ports (format "~a -q" (patch-exec-path *scheme*)) (open-process-ports (format "~a -q" (patch-exec-path *scheme*))
(buffer-mode block) (buffer-mode block)
(native-transcoder))]) (native-transcoder))])
(pretty-print `(#%$enable-check-prelex-flags ,(#%$enable-check-prelex-flags)) to-stdin)
(for-each (lambda (expr) (pretty-print expr to-stdin)) expr*) (for-each (lambda (expr) (pretty-print expr to-stdin)) expr*)
(close-port to-stdin) (close-port to-stdin)
(let* ([stdout-stuff (slurp from-stdout)] (let* ([stdout-stuff (slurp from-stdout)]