Changeset 399 in dev for trunk/abdev/BasicCompiler64

Timestamp:

Feb 26, 2008, 3:16:40 AM (17 years ago)

Author:

dai_9181

Message:

関数の戻り値がクラス型のとき、直接インデクサ指定できるような対応を行った。ただし、この対応は暫定的なものであるため、後ほど改修が必要。

File:

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

trunk/abdev/BasicCompiler64/NumOpe.cpp

@@ -146 +146 @@
     if(ArrayElements[0]){
         Type classType;
-        GetMemberType( leftType, VarName, classType, 0, false );
+        if( VarName[0] == '\0' )
+        {
+            classType = leftType;
+        }
+        else
+        {
+            GetMemberType( leftType, VarName, classType, 0, false );
+        }
         if( classType.IsObject() )
         {
@@ -152 +159 @@
             compiler.codeGenerator.op_mov_RR( REG_R11, useReg );
 
-            RELATIVE_VAR relativeVar;
-            relativeVar.dwKind=VAR_DIRECTMEM;
-
-            if( !_member_offset(
-                true,   //エラー表示あり
-                false,  //読み込み専用
-                leftType,
-                VarName,&relativeVar,classType,0))
+            if( VarName[0] )
             {
-                return false;
-            }
-
-            // オブジェクトメンバのポインタをraxにコピー
-            if( !VarToReg( relativeVar, baseType, resultType ) ){
-                SetError(11,termFull,cp);
+                RELATIVE_VAR relativeVar;
+                relativeVar.dwKind=VAR_DIRECTMEM;
+
+                if( !_member_offset(
+                    true,   //エラー表示あり
+                    false,  //読み込み専用
+                    leftType,
+                    VarName,&relativeVar,classType,0))
+                {
+                    return false;
+                }
+
+                // オブジェクトメンバのポインタをraxにコピー
+                if( !VarToReg( relativeVar, baseType, resultType ) ){
+                    SetError(11,termFull,cp);
+                }
+            }
+            else
+            {
+                // オブジェクトメンバのポインタは既にraxに入っている
             }
 
@@ -238 +252 @@
         const UserProc *pUserProc = OverloadSolutionWithStrParam(termFull,userProcs,parameter,termLeft);
 
-        if( pUserProc ){
+        if( pUserProc )
+        {
+            // TODO: この判定処理は暫定（特に[]サーチを行うところが）
+            if( pUserProc->Params().size() == 0 && parameter[0] && strstr( termFull, "[" ) )
+            {
+                TermMemberOpe( leftType, baseType, resultType, termFull, termLeft, methodName );
+
+                char temporary[VN_SIZE], temp2[VN_SIZE];
+                sprintf( temporary, "[%s]", parameter );
+                sprintf( temp2, "%s.%s", termLeft, methodName );
+                Type classType = resultType;
+                return TermMemberOpe( classType, baseType, resultType, termFull, temp2, temporary );
+            }
 
             resultType = pUserProc->ReturnType();