mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-10-31 03:11:39 +01:00 
			
		
		
		
	* update status also for internalerrors
This commit is contained in:
		
							parent
							
								
									a9d8c411a3
								
							
						
					
					
						commit
						13d2cb30b0
					
				| @ -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 | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user
	 peter
						peter