Inicio Explorar Axuda
Iniciar sesión
pascal
/
fpc
réplica de https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Ficheiros Incidencias 0 Wiki
Explorar o código

* fixed compilation of 8086 compiler.

git-svn-id: trunk@31746 -
yury %!s(int64=10) %!d(string=hai) anos
pai
11a9ff4a43
achega
374148b966
Modificáronse 2 ficheiros con 2 adicións e 2 borrados
Dividir vista Mostrar estatísticas de Diff
  1. 1 1
      compiler/ncgld.pas
  2. 1 1
      compiler/x86/nx86mat.pas

+ 1 - 1
compiler/ncgld.pas
Ver ficheiro 

@@ -589,7 +589,7 @@ implementation
 
          alignmentrequirement,
 
          len : aint;
 
          r : tregister;
 
-         {$if not defined(cpu64bitalu) and not defined(x86)}
 
+         {$if not defined(cpu64bitalu)}
 
          r64 : tregister64;
 
          {$endif}
 
          oldflowcontrol : tflowcontrol;

+ 1 - 1
compiler/x86/nx86mat.pas
Ver ficheiro 

@@ -230,7 +230,7 @@ interface
 
     procedure tx86notnode.second_boolean;
 
       var
 
          opsize : tcgsize;
 
-         {$if defined(cpu32bitalu)}
 
+         {$if defined(cpu32bitalu) or defined(cpu16bitalu)}
 
          hreg: tregister;
 
          {$endif}
 
       begin