rktio: fix output of newlines in text files in Windows

This commit is contained in:
Gustavo Massaccesi 2021-04-08 09:37:55 -03:00 committed by Matthew Flatt
parent 4cf538f349
commit 24c6b2450c
2 changed files with 2 additions and 2 deletions

View File

@ -58,7 +58,7 @@
(check who path-string? path)
(define (mode->flags mode)
(case mode
[(test) RKTIO_OPEN_TEXT]
[(text) RKTIO_OPEN_TEXT]
[(truncate truncate/replace) (+ RKTIO_OPEN_TRUNCATE
RKTIO_OPEN_CAN_EXIST)]
[(must-truncate) (+ RKTIO_OPEN_TRUNCATE