diff options
| author | Hans Bolinder <[email protected]> | 2015-09-25 12:40:14 +0200 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2015-09-28 08:59:44 +0200 |
| commit | ba531a173d0dc6906f8492f3bfa0b2cd40e2951a (patch) | |
| tree | 2e14cedb57157235479ecb868e663997ee08c97d /lib/typer | |
| parent | 7fb90f21d37ed0f3d4853e79deb3f641a00d43d0 (diff) | |
| download | otp-ba531a173d0dc6906f8492f3bfa0b2cd40e2951a.tar.gz otp-ba531a173d0dc6906f8492f3bfa0b2cd40e2951a.tar.bz2 otp-ba531a173d0dc6906f8492f3bfa0b2cd40e2951a.zip | |
typer: Fix a bug
Instead of outputting a formatted message showing errors found, a core
was (often) created.
Diffstat (limited to 'lib/typer')
| -rw-r--r-- | lib/typer/src/typer.erl | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/lib/typer/src/typer.erl b/lib/typer/src/typer.erl index ec00bfaba0..562530c868 100644 --- a/lib/typer/src/typer.erl +++ b/lib/typer/src/typer.erl @@ -1012,15 +1012,7 @@ compile_error(Reason) -> -spec msg(string()) -> 'ok'. msg(Msg) -> - case os:type() of - {unix, _} -> % Output a message on 'stderr', if possible - P = open_port({fd, 0, 2}, [out]), - port_command(P, Msg), - true = port_close(P), - ok; - _ -> % win32 - io:format("~s", [Msg]) - end. + io:format(standard_error, "~s", [Msg]). %%-------------------------------------------------------------------- %% Version and help messages. |