diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2021-09-15 20:30:36 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2021-09-15 20:31:23 -0400 |
| commit | 10eff0c404eeb7bf777645ff9ba0ef80d3e28064 (patch) | |
| tree | 04a0d6ad3cca7cff9331293e85689b8513765a20 | |
| parent | 64923cf295ea914db458547432237a5ed1eff571 (diff) | |
| download | haskell-wip/T20353.tar.gz | |
rts: Set stderr mode to reflect UTF-8 encodingwip/T20353
Fixes #20353.
| -rw-r--r-- | rts/RtsMessages.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/RtsMessages.c b/rts/RtsMessages.c index 9b165faea7..d0cfdae60e 100644 --- a/rts/RtsMessages.c +++ b/rts/RtsMessages.c @@ -191,8 +191,8 @@ void rtsErrorMsgFn(const char *s, va_list ap) { #if defined(mingw32_HOST_OS) - /* Ensure we're in text mode so newlines get encoded properly. */ - int mode = _setmode (_fileno(stderr), _O_TEXT); + /* Ensure we're in UTF-8 text mode so newlines get encoded properly. */ + int mode = _setmode (_fileno(stderr), _O_U8TEXT); if (isGUIApp()) { char buf[BUFSIZE]; |