Explorar el Código

* enable cpuneedsmulhelper for the 32-bit multiplication

git-svn-id: branches/i8086@23796 -
nickysn hace 12 años
padre
commit
d72d496478
Se han modificado 2 ficheros con 2 adiciones y 1 borrados
  1. 1 0
      compiler/fpcdefs.inc
  2. 1 1
      compiler/nadd.pas

+ 1 - 0
compiler/fpcdefs.inc

@@ -54,6 +54,7 @@
   {$define fewintregisters}
   {$define cpurox}
   {$define SUPPORT_SAFECALL}
+  {$define cpuneedsmulhelper}
 {$endif i8086}
 
 {$ifdef i386}

+ 1 - 1
compiler/nadd.pas

@@ -2917,7 +2917,7 @@ implementation
              else
                begin
 {$ifdef cpuneedsmulhelper}
-                 if (nodetype=muln) and not(torddef(resultdef).ordtype in [u8bit,s8bit]) then
+                 if (nodetype=muln) and not(torddef(resultdef).ordtype in [u8bit,s8bit{$ifdef cpu16bitalu},u16bit,s16bit{$endif}]) then
                    begin
                      result := nil;