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

* fixed typo disableredir -> redirdisable

Browse Source
This commit is contained in:
peter 1999-05-02 14:29:35 +00:00
parent 9977c0294d
commit c3368bbe07
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
ide/text/fpcompil.pas
View File

@ -20,7 +20,7 @@ interface
{ don't redir under linux, because all stdout (also from the ide!) will { don't redir under linux, because all stdout (also from the ide!) will
then be redired (PFV) } then be redired (PFV) }
{ this should work now correctly because { this should work now correctly because
DisableRedirAll and EnableRedirAll function are added in fpredir (PM) } RedirDisableAll and RedirEnableAll function are added in fpredir (PM) }
{$ifndef debug} {$ifndef debug}
{$ifndef linux} {$ifndef linux}
{$define redircompiler} {$define redircompiler}
@ -369,7 +369,7 @@ end;
function CompilerStatus: boolean; {$ifndef FPC}far;{$endif} function CompilerStatus: boolean; {$ifndef FPC}far;{$endif}
begin begin
{$ifdef redircompiler} {$ifdef redircompiler}
DisableRedirAll; RedirDisableAll;
{$endif} {$endif}
{ only display line info every 100 lines, ofcourse all other messages { only display line info every 100 lines, ofcourse all other messages
will be displayed directly } will be displayed directly }
@ -383,7 +383,7 @@ begin
end; end;
CompilerStatus:=false; CompilerStatus:=false;
{$ifdef redircompiler} {$ifdef redircompiler}
EnableRedirAll; RedirEnableAll;
{$endif} {$endif}
end; end;
@ -399,7 +399,7 @@ begin
switch_to_base_heap; switch_to_base_heap;
{$endif TEMPHEAP} {$endif TEMPHEAP}
{$ifdef redircompiler} {$ifdef redircompiler}
DisableRedirAll; RedirDisableAll;
{$endif} {$endif}
CompilerComment:=false; CompilerComment:=false;
{$ifndef DEV} {$ifndef DEV}
@ -415,7 +415,7 @@ begin
{ HeapView^.Update; } { HeapView^.Update; }
end; end;
{$ifdef redircompiler} {$ifdef redircompiler}
EnableRedirAll; RedirEnableAll;
{$endif} {$endif}
{$ifdef TEMPHEAP} {$ifdef TEMPHEAP}
switch_to_temp_heap; switch_to_temp_heap;
@ -553,7 +553,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.25 1999-04-29 22:58:09 pierre Revision 1.26 1999-05-02 14:29:35 peter
* fixed typo disableredir -> redirdisable
Revision 1.25 1999/04/29 22:58:09 pierre
+ disabling of redirction in compiler dialogs + disabling of redirction in compiler dialogs
Revision 1.24 1999/04/29 09:36:11 peter Revision 1.24 1999/04/29 09:36:11 peter