paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 12:25:59 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Rename WriteExceptionToStdErr -> WriteErrorsToStdErr

Browse Source 
git-svn-id: trunk@30555 -
This commit is contained in:
michael 2015-04-12 15:37:46 +00:00
parent bd803769b8
commit 81fa382c42
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/system.inc
View File

@ -993,7 +993,7 @@ Begin
redirection to seriell i/o } redirection to seriell i/o }
{$ifndef EMBEDDED} {$ifndef EMBEDDED}
{ Show runtime error and exit } { Show runtime error and exit }
if WriteExceptionToStdErr then if WriteErrorsToStdErr then
pstdout:=@stderr pstdout:=@stderr
else else
pstdout:=@stdout; pstdout:=@stdout;

2
rtl/inc/systemh.inc
View File

@ -754,7 +754,7 @@ Var
StackLength : SizeUInt; StackLength : SizeUInt;
Var Var
WriteExceptionToStdErr : Boolean = True; WriteErrorsToStdErr : Boolean = True;
function StackTop: Pointer; function StackTop: Pointer;

2
rtl/objpas/sysutils/sysutils.inc
View File

@ -291,7 +291,7 @@ Var
hstdout : ^text; hstdout : ^text;
begin begin
if WriteExceptionToStdErr then if WriteErrorsToStdErr then
hstdout:=@stderr hstdout:=@stderr
else else
hstdout:=@stdout; hstdout:=@stdout;