Changeset 319 in dev for trunk/abdev/BasicCompiler32

Timestamp:

Sep 9, 2007, 12:37:48 PM (17 years ago)

Author:

dai_9181

Message:

GCのバグをいくつか修正

Location:

trunk/abdev/BasicCompiler32

Files:

• Compile_Object.cpp (modified) (1 diff)
• Compile_ProcOp.cpp (modified) (1 diff)
• NumOpe.cpp (modified) (5 diffs)

trunk/abdev/BasicCompiler32/Compile_Object.cpp

@@ -205 +205 @@
 
 
+    //仮想関数テーブルを初期化
+    if( classObj.IsExistVirtualFunctions()
+        && !classObj.IsAbstract() )
+    {
+        // mov ecx,vtblAddress
+        compiler.codeGenerator.op_mov_RV_vtbl( REG_ECX, &classObj );
+
+        //mov dword ptr[eax],ecx
+        compiler.codeGenerator.op_mov_MR( sizeof(long), REG_ECX, REG_EAX, 0, MOD_BASE );
+
+        // 仮想関数になるメソッドに使用チェックをつける
+        BOOST_FOREACH( const CMethod *pMethod, classObj.GetMethods() )
+        {
+            if( pMethod->IsVirtual() )
+            {
+                pMethod->GetUserProc().Using();
+            }
+        }
+    }
+
+
     // ※ここでプッシュされた値はNew演算子の戻り値となる
     //push eax

trunk/abdev/BasicCompiler32/Compile_ProcOp.cpp

@@ -536 +536 @@
                 }
             }
-
-            //仮想関数テーブルを初期化
-            if( compiler.pCompilingClass->IsExistVirtualFunctions()
-                && !compiler.pCompilingClass->IsAbstract() )
-            {
-                // mov eax,vtblAddress
-                compiler.codeGenerator.op_mov_RV_vtbl( REG_EAX, compiler.pCompilingClass );
-
-                //Thisポインタをecxにコピー
-                SetThisPtrToReg(REG_ECX);
-
-                //mov dword ptr[ecx],eax
-                compiler.codeGenerator.op_mov_MR( sizeof(long), REG_EAX, REG_ECX, 0, MOD_BASE );
-
-
-                // 仮想関数になるメソッドに使用チェックをつける
-                BOOST_FOREACH( const CMethod *pMethod, compiler.pCompilingClass->GetMethods() )
-                {
-                    if( pMethod->IsVirtual() )
-                    {
-                        pMethod->GetUserProc().Using();
-                    }
-                }
-            }
         }
         else if( pUserProc->IsDestructor() ){

trunk/abdev/BasicCompiler32/NumOpe.cpp

@@ -73 +73 @@
 
     char *parameter = (char *)malloc( lstrlen( str ) + 32 );
-    sprintf( parameter, "\"%s\"%c%c*Char", str, 1, ESC_AS );
-    SetStringQuotes( parameter );
+    sprintf( parameter, "%s%c%c*Char", str, 1, ESC_AS );
 
     Operator_New( *compiler.GetObjectModule().meta.GetClasses().GetStringClassPtr(), "", parameter, Type( DEF_OBJECT, *compiler.GetObjectModule().meta.GetClasses().GetStringClassPtr() ) );
@@ -763 +762 @@
                 }
 
-                if(term[0]=='\"'){
-                    //リテラル文字列
-                    if(!RemoveStringQuotes(term)){
-                        SetError(43,NULL,cp);
-                        goto error;
-                    }
-                    i3=lstrlen(term);
-StrLiteral:
-
-                    if( baseType.IsObject() || baseType.IsNull() ){
+                if( (term[0]=='e'||term[0]=='E')
+                    && (term[1]=='x'||term[1]=='X')
+                    && term[2]=='\"'
+                    || term[0] == '\"' )
+                {
+                    if( baseType.IsObject() || baseType.IsNull() )
+                    {
                         //要求タイプがオブジェクト、または未定のとき
 
@@ -786 +782 @@
                     }
 
-
+                    bool isEx = true;
+                    if( term[0] == '\"' )
+                    {
+                        isEx = false;
+                    }
+
+                    if( isEx )
+                    {
+                        // 拡張版リテラル文字列（エスケープシーケンス可能）
+                        if(!RemoveStringQuotes(term+2)){
+                            SetError(43,NULL,cp);
+                            goto error;
+                        }
+                        i3=FormatString_EscapeSequence(term+2);
+                        term+=2;
+                    }
+                    else
+                    {
+                        // 通常文字列
+                        if(!RemoveStringQuotes(term)){
+                            SetError(43,NULL,cp);
+                            goto error;
+                        }
+                        i3=lstrlen(term);
+                    }
+StrLiteral:
                     type_stack[sp]=typeOfPtrChar;
                     bLiteralCalculation=0;
@@ -794 +815 @@
                     //push DataSize
                     compiler.codeGenerator.op_push_V( i2, Schedule::DataTable );
-                }
-                else if((term[0]=='e'||term[0]=='E')&&
-                    (term[1]=='x'||term[1]=='X')&&
-                    term[2]=='\"'){
-                    //拡張版リテラル文字列（エスケープシーケンス可能）
-                    if(!RemoveStringQuotes(term+2)){
-                        SetError(43,NULL,cp);
-                        goto error;
-                    }
-                    i3=FormatString_EscapeSequence(term+2);
-                    term+=2;
-
-                    goto StrLiteral;
                 }
                 else if(IsVariableTopChar(term[0])||
@@ -896 +904 @@
                             //リテラル文字列
 
+                            if( baseType.IsObject() || baseType.IsNull() )
+                            {
+                                //要求タイプがオブジェクト、または未定のとき
+
+                                //String型オブジェクトを生成
+                                NewStringObject(term);
+
+                                type_stack[sp]=DEF_OBJECT;
+                                index_stack[sp]=(LONG_PTR)compiler.GetObjectModule().meta.GetClasses().GetStringClassPtr();
+                                bLiteralCalculation=0;
+
+                                sp++;
+                                break;
+                            }
+
                             double dbl = compiler.GetObjectModule().meta.GetGlobalConsts().GetDoubleData(term);
                             memcpy(&i64data,&dbl,sizeof(double));