mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 02:39:40 +01:00 
			
		
		
		
	- change id_type to single_type in readImplementedInterfacesAndProtocols to allow use of interface specializations inside class parent block - change single_type boolean arguments to set, add stoParseClassParent option to that set - move parse_generic variable assignment from parse_object_members to outer routine to setup it before parsing class parents - return paticular generic in generate_specialization instead of undefineddef to pass class/interface checks inside parent class block - add test for delphi mode - modify tw11431 to be syntatically correct git-svn-id: trunk@16706 -
		
			
				
	
	
		
			20 lines
		
	
	
		
			241 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			20 lines
		
	
	
		
			241 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
{$mode objfpc}
 | 
						|
unit tw11431;
 | 
						|
 | 
						|
interface
 | 
						|
 | 
						|
uses sysutils;
 | 
						|
 | 
						|
type
 | 
						|
 | 
						|
  generic IGenericCollection<_T> = interface
 | 
						|
  end;
 | 
						|
 | 
						|
  generic CGenericCollection<_T> = class(TInterfacedObject, specialize IGenericCollection<_T>)
 | 
						|
  end;
 | 
						|
 | 
						|
implementation
 | 
						|
 | 
						|
 | 
						|
end.
 |