mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 06:39:25 +01:00 
			
		
		
		
	* keep the node flags when replacing a call to a virtual class method with
a call to its wrapper git-svn-id: branches/jvmbackend@18708 -
This commit is contained in:
		
							parent
							
								
									e9d27c3efe
								
							
						
					
					
						commit
						2a9043f4bc
					
				@ -566,6 +566,7 @@ implementation
 | 
			
		||||
                begin
 | 
			
		||||
                  remove_hidden_paras;
 | 
			
		||||
                  result:=ccallnode.create(left,tprocsym(sym),symtableproc,methodpointer,callnodeflags);
 | 
			
		||||
                  result.flags:=flags;
 | 
			
		||||
                  left:=nil;
 | 
			
		||||
                  methodpointer:=nil;
 | 
			
		||||
                  exit;
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user