mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 14:39:36 +01:00 
			
		
		
		
	* use 16-bit operand types for call/jmp immediate on i8086 in taicpu.create_ot
git-svn-id: trunk@30563 -
This commit is contained in:
		
							parent
							
								
									a25a906d56
								
							
						
					
					
						commit
						fe30b53e95
					
				@ -1234,10 +1234,18 @@ implementation
 | 
			
		||||
                             ) then
 | 
			
		||||
                            ot:=OT_IMM8 or OT_SHORT
 | 
			
		||||
                          else
 | 
			
		||||
{$ifdef i8086}
 | 
			
		||||
                            ot:=OT_IMM16 or OT_NEAR;
 | 
			
		||||
{$else i8086}
 | 
			
		||||
                            ot:=OT_IMM32 or OT_NEAR;
 | 
			
		||||
{$endif i8086}
 | 
			
		||||
                        end
 | 
			
		||||
                      else
 | 
			
		||||
{$ifdef i8086}
 | 
			
		||||
                        ot:=OT_IMM16 or OT_NEAR;
 | 
			
		||||
{$else i8086}
 | 
			
		||||
                        ot:=OT_IMM32 or OT_NEAR;
 | 
			
		||||
{$endif i8086}
 | 
			
		||||
                    end;
 | 
			
		||||
                end;
 | 
			
		||||
              top_local :
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user