Changeset 64 in dev for BasicCompiler32/Compile_Calc.cpp

Timestamp:

Mar 8, 2007, 2:49:34 AM (17 years ago)

Author:

dai_9181

Message:

すべてのオブジェクトを参照型に切り替えた。

File:

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

BasicCompiler32/Compile_Calc.cpp

@@ -364 +364 @@
     //push eax
     op_push(REG_EAX);
+}
+
+
+
+
+
+
+
+
+
+void RestoreDefaultRegisterFromStackMemory( int type ){
+    //現在のスタックの内容を実数レジスタに保存する
+    //NumOpeの直後専用
+    if(type==DEF_DOUBLE){
+        //fld qword ptr[esp]
+        op_fld_ptr_esp(DEF_DOUBLE);
+
+        //add esp,8
+        op_add_esp(8);
+    }
+    else if(type==DEF_SINGLE){
+        //fld dword ptr[esp]
+        op_fld_ptr_esp(DEF_SINGLE);
+
+        //add esp,4
+        op_add_esp(4);
+    }
+    else if( Is64Type( type ) ){
+        //pop eax
+        op_pop(REG_EAX);
+
+        //pop edx
+        op_pop(REG_EDX);
+    }
+    else{
+        //pop eax
+        op_pop(REG_EAX);
+    }
+}
+
+void SetVariableFromEax(int VarType,int CalcType,RELATIVE_VAR *pRelativeVar){
+    /////////////////////////////////////////////////
+    // eaxの内容を変数にコピーするコードを抽出
+    /////////////////////////////////////////////////
+
+    if(VarType==DEF_BOOLEAN){
+        //bool
+        SetBooleanVariable(CalcType,pRelativeVar);
+    }
+    else if( IsRealNumberType( VarType ) ){
+        // Double/Single型変数へレジスタの値を代入
+        SetRealVariable(VarType, CalcType, pRelativeVar);
+    }
+    else if( IsWholeNumberType( VarType ) || VarType == DEF_OBJECT ){
+        int typeSize = GetTypeSize( VarType, -1 );
+
+        //整数変数へraxの値を格納する
+        SetWholeVariable( typeSize, CalcType, pRelativeVar );
+    }
+    else{
+        SetError(300,NULL,cp);
+    }
 }
 
@@ -485 +547 @@
     }
 
+
+    if( lstrcmpi( variable, "This" ) == 0 ){
+        SetError(133,NULL,cp);
+        return;
+    }
+
+
     ////////////////////////////////////////
     // 変数のタイプ型を識別して、演算を行う
@@ -511 +580 @@
     else ProcPtr_BaseIndex=-1;
 
-    if(VarType==DEF_OBJECT){
-        //代入演算のオーバーロード オペレータに備える
+    if(VarType==DEF_STRUCT){
+        //代入コピーに備える
 
         //変数アドレスを取得
@@ -544 +613 @@
     }
 
-    if(VarType==DEF_OBJECT){
+    if(VarType==DEF_STRUCT){
         //オブジェクトインスタンスへの代入
-        SetObjectVariable(lpVarIndex,CalcType,lpCalcIndex,bCalcUseHeap);
+        SetStructVariable(lpVarIndex,CalcType,lpCalcIndex,bCalcUseHeap);
         return;
     }
 
-    if(CalcType==DEF_OBJECT){
+    if(CalcType==DEF_OBJECT && (CalcType!=VarType || lpCalcIndex!=lpVarIndex) ){
         //キャスト演算子のオーバーロードに対応する
         CallCastOperatorProc(CalcType,lpCalcIndex,bCalcUseHeap,VarType,lpVarIndex);
@@ -568 +637 @@
     /////////////////////////////////////////////////
 
+    //eax、edx:eax、またはst(0)にスタック上のデータを取り出す
+    RestoreDefaultRegisterFromStackMemory( CalcType );
+
+    SetVariableFromEax( VarType, CalcType, &VarRelativeVar );
+/*
+    TODO: 消す
     if(VarType==DEF_BOOLEAN){
         //bool
@@ -598 +673 @@
         //Single型変数へスタックの内容を格納する
         SetSingleVariable(CalcType,VarRelativeVar.dwKind,VarRelativeVar.offset,VarRelativeVar.bOffsetOffset);
-    }
-}
-
+    }*/
+}
+
+
+// TODO: 消す
+/*
 void SetRefVariable( const char *varname, const char *expression ){
     ////////////////////////////////////////
@@ -721 +799 @@
     }
 }
+*/