Changeset 66 in dev for BasicCompiler32/Compile_Calc.cpp

Timestamp:

Mar 9, 2007, 4:59:13 AM (18 years ago)

Author:

dai_9181

Message:

参照型の整数型パラメータに実数を代入すると「内部エラー」になってしまうバグを修正。
参照型の整数型にリテラル値を直接指定すると「内部エラー」になってしまうバグを修正。
バージョンをβ15にした。

File:

• BasicCompiler32/Compile_Calc.cpp (modified) (4 diffs)

BasicCompiler32/Compile_Calc.cpp

@@ -223 +223 @@
 
         //fistp qword ptr[esp]
-        fpu_cast();
-        OpBuffer[obp++]=(char)0xDF;
-        OpBuffer[obp++]=(char)0x3C;
-        OpBuffer[obp++]=(char)0x24;
-        fpu_cast_end();
+        op_fistp_ptr_esp( sizeof(_int64) );
     }
     else if(OldType==DEF_SINGLE){
@@ -237 +233 @@
 
         //fistp qword ptr[esp]
-        fpu_cast();
-        OpBuffer[obp++]=(char)0xDF;
-        OpBuffer[obp++]=(char)0x3C;
-        OpBuffer[obp++]=(char)0x24;
-        fpu_cast_end();
+        op_fistp_ptr_esp( sizeof(_int64) );
     }
     else if(IsWholeNumberType(OldType)){
@@ -288 +280 @@
 
         //fistp dword ptr[esp]
-        fpu_cast();
-        OpBuffer[obp++]=(char)0xDB;
-        OpBuffer[obp++]=(char)0x1C;
-        OpBuffer[obp++]=(char)0x24;
-        fpu_cast_end();
+        op_fistp_ptr_esp( sizeof(long) );
     }
     else if(OldType==DEF_SINGLE){
@@ -299 +287 @@
 
         //fistp dword ptr[esp]
-        fpu_cast();
-        OpBuffer[obp++]=(char)0xDB;
-        OpBuffer[obp++]=(char)0x1C;
-        OpBuffer[obp++]=(char)0x24;
-        fpu_cast_end();
+        op_fistp_ptr_esp( sizeof(long) );
     }
     else if(OldType==DEF_INT64||OldType==DEF_QWORD){