suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

rktio: fix output of newlines in text files in Windows

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/io/port/file-port.rkt
View File

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