mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 08:19:36 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			12 lines
		
	
	
		
			155 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			12 lines
		
	
	
		
			155 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
unit bug0156b;
 | 
						|
interface
 | 
						|
 | 
						|
type
 | 
						|
       _win_st = record
 | 
						|
            _parent : ^WINDOW;
 | 
						|
         end;
 | 
						|
        WINDOW = _win_st;
 | 
						|
    	   
 | 
						|
implementation
 | 
						|
 | 
						|
end. |