--stdout make compiler messages go to stderr

This commit is contained in:
Araq 2011-02-25 21:08:19 +01:00
commit f93ca8e42a
10 changed files with 36 additions and 33 deletions

View file

@ -1,7 +1,7 @@
#
#
# The Nimrod Compiler
# (c) Copyright 2008 Andreas Rumpf
# (c) Copyright 2011 Andreas Rumpf
#
# See the file "copying.txt", included in this
# distribution, for details about the copyright.
@ -139,7 +139,7 @@ proc parseDirective(L: var TLexer, tok: PToken) =
doEnd(L, tok)
of wWrite:
ppGetTok(L, tok)
msgs.MessageOut(tokToStr(tok))
msgs.MsgWriteln(tokToStr(tok))
ppGetTok(L, tok)
of wPutEnv:
ppGetTok(L, tok)
@ -254,4 +254,4 @@ proc LoadConfig(project: string) =
if not (optSkipProjConfigFile in gGlobalOptions) and (project != ""):
conffile = changeFileExt(project, "cfg")
if existsFile(conffile): readConfigFile(conffile)