From e6c8ac6694e91c6a42a0f0585987f85400d4aa8b Mon Sep 17 00:00:00 2001 From: nickysn Date: Sun, 17 Mar 2013 15:40:54 +0000 Subject: [PATCH] * use the generic tcgaddnode.second_addsmallset on i8086, because the BTx instructions are 386+ git-svn-id: branches/i8086@23895 - --- compiler/x86/nx86add.pas | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/compiler/x86/nx86add.pas b/compiler/x86/nx86add.pas index aedd6207ce..ccf0859443 100644 --- a/compiler/x86/nx86add.pas +++ b/compiler/x86/nx86add.pas @@ -44,7 +44,9 @@ unit nx86add; procedure second_addfloatsse; public procedure second_addfloat;override; +{$ifndef i8086} procedure second_addsmallset;override; +{$endif not i8086} procedure second_add64bit;override; procedure second_cmpfloat;override; procedure second_cmpsmallset;override; @@ -332,6 +334,7 @@ unit nx86add; AddSmallSet *****************************************************************************} +{$ifndef i8086} procedure tx86addnode.second_addsmallset; var setbase : aint; @@ -439,6 +442,7 @@ unit nx86add; if opsize<>int_cgsize(resultdef.size) then hlcg.location_force_reg(current_asmdata.CurrAsmList,location,opdef,hlcg.tcgsize2orddef(int_cgsize(resultdef.size)),false); end; +{$endif not i8086} procedure tx86addnode.second_cmpsmallset;