mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-10-31 21:09:38 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			33 lines
		
	
	
		
			577 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			33 lines
		
	
	
		
			577 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
| unit exe;
 | |
| 
 | |
|   interface
 | |
| 
 | |
|     type
 | |
|        exe = record
 | |
|           eid : WORD;
 | |
|           elast : WORD;
 | |
|           epagsiz : WORD;
 | |
|           erelcnt : WORD;
 | |
|           ehdrsiz : WORD;
 | |
|           eminfre : WORD;
 | |
|           emaxfre : WORD;
 | |
|           eiSS : WORD;
 | |
|           eiSP : WORD;
 | |
|           enegsum : WORD;
 | |
|           eiIP : WORD;
 | |
|           eiCS : WORD;
 | |
|           ereloff : WORD;
 | |
|           eovlnum : WORD;
 | |
|           ever : WORD;
 | |
|           dumy : WORD;
 | |
|           ebb : WORD;
 | |
|           dumy2 : array[0..7-1] of WORD;
 | |
|        end;
 | |
| 
 | |
|     const
 | |
|        EXEID = $5a4d;
 | |
| 
 | |
|   implementation
 | |
| 
 | |
| end.
 | 
