Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* FADD without arg is alias of FADDP

pierre 25 years ago
parent
24e5f16174
commit
9e97eb9e76
2 changed files with 2 additions and 2 deletions
Split View Show Diff Stats
  1. 1 1
      compiler/i386ins.dat
  2. 1 1
      compiler/i386tab.inc

+ 1 - 1
compiler/i386ins.dat
View File 

@@ -347,7 +347,7 @@ void                  \2\xD9\xE1                      8086,FPU
 
 (Ch_FPU, Ch_None, Ch_None)
 
 mem32                 \300\1\xD8\200                  8086,FPU
 
 mem64                 \300\1\xDC\200                  8086,FPU
 
-void                  \2\xDC\xC1                      8086,FPU
 
+void                  \2\xDE\xC1                      8086,FPU
 
 fpureg|to             \1\xDC\10\xC0                   8086,FPU
 
 fpureg,fpu0           \1\xDC\10\xC0                   8086,FPU
 
 fpureg                \1\xD8\10\xC0                   8086,FPU

+ 1 - 1
compiler/i386tab.inc
View File 

@@ -1425,7 +1425,7 @@
 
     opcode  : A_FADD;
 
     ops     : 0;
 
     optypes : (ot_none,ot_none,ot_none);
 
-    code    : #2#220#193;
 
+    code    : #2#222#193;
 
     flags   : if_8086 or if_fpu
 
   ),
 
   (