paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-08 16:39:46 +01:00
Code Issues Packages Projects Releases Wiki Activity

* update status also for internalerrors

Browse Source
This commit is contained in:
peter 1998-11-26 13:08:19 +00:00
parent a9d8c411a3
commit 13d2cb30b0
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/verbose.pas
View File

@ -289,6 +289,7 @@ end;
procedure internalerror(i : longint); procedure internalerror(i : longint);
begin begin
UpdateStatus;
do_internalerror(i); do_internalerror(i);
inc(status.errorcount); inc(status.errorcount);
stop; stop;
@ -428,7 +429,10 @@ end.
{ {
$Log$ $Log$
Revision 1.28 1998-11-06 09:45:41 pierre Revision 1.29 1998-11-26 13:08:19 peter
* update status also for internalerrors
Revision 1.28 1998/11/06 09:45:41 pierre
* bug on errors (file used after dispose !) fixed * bug on errors (file used after dispose !) fixed
Revision 1.27 1998/10/28 18:26:24 pierre Revision 1.27 1998/10/28 18:26:24 pierre