mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-31 17:30:38 +02:00
* update status also for internalerrors
This commit is contained in:
parent
a9d8c411a3
commit
13d2cb30b0
@ -289,6 +289,7 @@ end;
|
||||
|
||||
procedure internalerror(i : longint);
|
||||
begin
|
||||
UpdateStatus;
|
||||
do_internalerror(i);
|
||||
inc(status.errorcount);
|
||||
stop;
|
||||
@ -428,7 +429,10 @@ end.
|
||||
|
||||
{
|
||||
$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
|
||||
|
||||
Revision 1.27 1998/10/28 18:26:24 pierre
|
||||
|
Loading…
Reference in New Issue
Block a user