Changeset 255 in dev for trunk/abdev/BasicCompiler64/NumOpe.cpp

Timestamp:

Aug 1, 2007, 3:37:09 AM (17 years ago)

Author:

dai_9181

Message:

 

File:

• trunk/abdev/BasicCompiler64/NumOpe.cpp (modified) (6 diffs)

trunk/abdev/BasicCompiler64/NumOpe.cpp

@@ -519 +519 @@
 }
 
-bool NumOpe( int *pReg,
+bool _numope( int *pReg,
             const char *expression,
             const Type &baseType,
             Type &resultType,
-            BOOL *pbUseHeap ){
+            BOOL *pbUseHeap )
+{
 
     int i,i2,i3;
@@ -684 +685 @@
 
 
-    BOOL bInitRegSwitch=0;
-    if(!pobj_reg){
-        bInitRegSwitch=1;
-
-        //作業用レジスタを取得
-        pobj_reg=new CRegister(*pReg);
-    }
-
-    //エラー時の復旧用
-    CRegister objReg_Backup;
-    objReg_Backup=*pobj_reg;
-
-
 
     ////////////////////////////////
@@ -707 +695 @@
     //リテラル値のみの計算かどうかを判別するためのフラグ
     BOOL bLiteralCalculation=1;
-
-    //リテラル演算の場合を考慮した演算前のバッファ位置
-    int BeforeObp;
-    BeforeObp=obp;
-
-    //リテラル演算の場合を考慮した演算前のプロシージャスケジュール位置
-    //※64ビットの掛け算、除算などで特殊関数が呼ばれるため
-    int Before_ProcAddrScheduleNum;
-    Before_ProcAddrScheduleNum=pobj_SubAddrSchedule->num;
-
-    //リテラル演算の場合を考慮した演算前のデータテーブルスケジュール位置
-    int Before_DataTableScheduleNum;
-    Before_DataTableScheduleNum=pobj_DataTableSchedule->num;
-
-    //リテラル演算の場合を考慮した演算前の再配置スケジュール
-    CReloc *pobj_BackReloc;
-    pobj_BackReloc=new CReloc();
-    pobj_BackReloc->copy(pobj_Reloc);
-
-    //リテラル演算の場合を考慮した演算前のスタックフレームスケジュール位置
-    int Before_StackFrameScheduleNum;
-    Before_StackFrameScheduleNum=pobj_sf->num;
 
     double dbl;
@@ -1164 +1130 @@
 
     if(bLiteralCalculation){
-        //右辺値が数値の定数式の場合
-        Type resultType;
-        StaticCalculation(true, expression,baseType.GetBasicType(),&i64data,resultType);
-
-        obp=BeforeObp;
-        pobj_SubAddrSchedule->num=Before_ProcAddrScheduleNum;
-        pobj_DataTableSchedule->num=Before_DataTableScheduleNum;
-        pobj_Reloc->copy(pobj_BackReloc);
-        pobj_sf->num=Before_StackFrameScheduleNum;
-        *pobj_reg=objReg_Backup;
-
-        if(resultType.IsReal()){
-            if(baseType.IsReal()) resultType=baseType;
-
-            XmmReg=pobj_reg->LockXmmReg();
-
-            if(resultType.IsDouble()){
-                i3 = compiler.GetDataTable().Add( i64data );
-
-                //movlpd xmm_reg,qword ptr[data table offset]
-                compiler.codeGenerator.op_movlpd_RM( XmmReg, 0, i3, MOD_DISP32, Schedule::DataTable );
-            }
-            if(resultType.IsSingle()){
-                memcpy(&dbl,&i64data,sizeof(_int64));
-
-                float flt;
-                int i32data;
-                flt=(float)dbl;
-                memcpy(&i32data,&flt,sizeof(long));
-
-                i3 = compiler.GetDataTable().Add( i32data );
-
-                //movss xmm_reg,dword ptr[data table offset]
-                compiler.codeGenerator.op_movss_RM( XmmReg, 0, i3, MOD_DISP32, Schedule::DataTable );
-            }
-        }
-        else{
-            if(!resultType.Is64()){
-                //整数（符号有り/無し）
-
-                i3=(long)i64data;
-
-                if(resultType.GetBasicSize()==sizeof(char)) i3=i3&0x000000FF;
-                if(resultType.GetBasicSize()==sizeof(short)) i3=i3&0x0000FFFF;
-
-                i64data=(_int64)i3;
-            }
-
-            UseReg=pobj_reg->LockReg();
-
-            //mov reg,i64data
-            compiler.codeGenerator.op_mov_RV64(UseReg,i64data);
-        }
-
-        type_stack[0]=resultType.GetBasicType();
-        index_stack[0]=resultType.GetIndex();
+        SetError();
     }
     else{
@@ -1234 +1145 @@
 
 
+    resultType.SetType( type_stack[0], index_stack[0] );
+
+    bool isSuccessful = true;
+    goto finish;
+
+
+
+    //////////////////
+    // エラー処理
+    //////////////////
+
+error:
+
+    isSuccessful = false;
+    goto finish;
+
+
+
+
+finish:
+
+    for(i=0;i<pnum;i++){
+        if(values[i]) HeapDefaultFree(values[i]);
+    }
+
+    return isSuccessful;
+}
+
+bool NumOpe( int *pReg,
+            const char *expression,
+            const Type &baseType,
+            Type &resultType,
+            BOOL *pbUseHeap )
+{
+    BOOL bInitRegSwitch=0;
+    if(!pobj_reg){
+        bInitRegSwitch=1;
+
+        //作業用レジスタを取得
+        pobj_reg=new CRegister(*pReg);
+    }
+
+    //エラー時の復旧用
+    CRegister objReg_Backup;
+    objReg_Backup=*pobj_reg;
+
+    *pReg = pobj_reg->GetNextReg();
+
+
+    bool result = _numope( pReg, expression, baseType, resultType, pbUseHeap );
+
+
+    if( !result )
+    {
+        *pobj_reg=objReg_Backup;
+    }
+
     if(bInitRegSwitch){
         //整合性をチェック（バグ回避）
-        pobj_reg->bug_check();
+        if( result )
+        {
+            pobj_reg->bug_check();
+        }
 
         //作業レジスタを解放
@@ -1243 +1214 @@
     }
 
-    resultType.SetType( type_stack[0], index_stack[0] );
-
-    bool isSuccessful = true;
-    goto finish;
-
-
-
-    //////////////////
-    // エラー処理
-    //////////////////
-
-error:
-
-    *pobj_reg=objReg_Backup;
-
-    if(bInitRegSwitch){
-        //作業レジスタを解放
-        delete pobj_reg;
-        pobj_reg=0;
-    }
-
-    isSuccessful = false;
-    goto finish;
-
-
-
-
-finish:
-
-    for(i=0;i<pnum;i++){
-        if(values[i]) HeapDefaultFree(values[i]);
-    }
-
-    //再配置スケジュールバックアップ情報を解放
-    delete pobj_BackReloc;
-
-    return isSuccessful;
+    return result;
 }