Changeset 49 in dev for BasicCompiler64

Timestamp:

Feb 10, 2007, 6:13:37 AM (18 years ago)

Author:

dai_9181

Message:

戻り値オブジェクトのメンバを直接的に参照できるようにした。

Location:

BasicCompiler64

Files:

• Compile_Var.cpp (modified) (4 diffs)
• NumOpe.cpp (modified) (2 diffs)
• Opcode.h (modified) (1 diff)

BasicCompiler64/Compile_Var.cpp

@@ -388 +388 @@
     extern BOOL bCompilingGlobal;
     int i,RefType;
+    LONG_PTR lpIndex;
     char variable[VN_SIZE],member[VN_SIZE],VarName[VN_SIZE],array[VN_SIZE],lpPtrOffset[VN_SIZE];
 
@@ -396 +397 @@
     else lstrcpy(variable,NameBuffer);
 
+    if( FormatUseProcReturnObject( variable, VarName, array, RefType, member ) ){
+        // 戻り値オブジェクトのメンバを直接参照しているとき
+        //例: func().member
+
+        void *pInfo;
+        int idProc=GetProc(VarName,&pInfo);
+
+        if(idProc){
+            pRelativeVar->dwKind=VAR_DIRECTMEM;
+
+            //////////////////////////////////////////////////////
+            /////    レジスタ資源のバックアップ
+            {   BACKUP_REGISTER_RESOURCE
+            //////////////////////////////////////////////////////
+
+                ////////////////
+                // 呼び出し
+                ////////////////
+
+                *pType=CallProc(idProc,pInfo,VarName,array,&lpIndex);
+
+                //戻り値をr11にコピー
+                op_mov_RR( REG_R11, REG_RAX );
+
+            /////////////////////////////////////////////
+            //////   レジスタ資源を復元
+                RESTORE_REGISTER_RESOURCE
+            }////////////////////////////////////////////
+
+            LONG_PTR lp2;
+            if(!GetMemberOffset(
+                isErrorEnabled,
+                isWriteAccess,
+                (CClass *)lpIndex,
+                member,pType,pRelativeVar,&lp2,0)) return 0;
+            if(plpIndex) *plpIndex=lp2;
+
+            return 1;
+        }
+    }
+
+
+
     lstrcpy(VarName,variable);
     GetVarFormatString(VarName,array,lpPtrOffset,member,&RefType);
 
-    LONG_PTR lpIndex;
     int *pSubScripts;
     bool bConst = false;
@@ -565 +608 @@
     }
 
-
     /////////////////////
     // グローバル変数
@@ -635 +677 @@
     }
 
-    if(array[0]||member[0]){
+    if( array[0] || member[0] ){
         //xor r11,r11（r11を0に初期化する）
         //※r11は変数ベースアドレスからの相対オフセットを示す

BasicCompiler64/NumOpe.cpp

@@ -314 +314 @@
 
                         if(idProc){
-                            //閉じカッコ")"に続く文字がNULLでないときはエラーにする
-                            if(term[i2+1+i4+1]!='\0') SetError(42,NULL,cp);
+                            //閉じカッコ")"に続く文字がNULLでないとき
+                            if(term[i2+1+i4+1]!='\0'){
+                                if( term[i2+1+i4+1] == '.'
+                                    || term[i2+1+i4+1] == 1 && term[i2+1+i4+2] == ESC_PSMEM ){
+                                        goto NonProc;
+                                }
+                                else{
+                                    SetError(42,NULL,cp);
+                                }
+                            }
 
 
@@ -402 +410 @@
                         }
                     }
+NonProc:
 
 

BasicCompiler64/Opcode.h

@@ -62 +62 @@
 extern int obp;
 extern char *OpBuffer;
+
+#define breakpoint OpBuffer[obp++]=(char)0xCC;
+
 
 //ラベルアドレス