mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 07:43:04 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			17 lines
		
	
	
		
			291 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			17 lines
		
	
	
		
			291 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
{ %version=1.1 }
 | 
						|
 | 
						|
{$mode objfpc}
 | 
						|
 | 
						|
{ Source provided for Free Pascal Bug Report 1825 }
 | 
						|
{ Submitted by "marcov" on  2002-02-19 }
 | 
						|
{ e-mail: marco@freepascal.org }
 | 
						|
program x;
 | 
						|
 | 
						|
Type
 | 
						|
    IEnumMoniker = Interface (IUnknown)
 | 
						|
       ['{00000102-0000-0000-C000-000000000046}']
 | 
						|
       End;
 | 
						|
 | 
						|
begin
 | 
						|
end.
 |