Changeset 304 in dev

Timestamp:

Aug 26, 2007, 2:54:38 AM (17 years ago)

Author:

dai_9181

Message:

Superが機能しないバグを修正。
ソースコードが小さいとソース付加に失敗するバグを修正。

Location:

trunk/abdev

Files:

• BasicCompiler32/Compile_CallProc.cpp (modified) (2 diffs)
• BasicCompiler64/Compile_CallProc.cpp (modified) (2 diffs)
• BasicCompiler_Common/MakeExe.cpp (modified) (1 diff)
• BasicCompiler_Common/hash.cpp (modified) (2 diffs)
• BasicCompiler_Common/include/Source.h (modified) (1 diff)
• BasicCompiler_Common/include/option.h (modified) (1 diff)

trunk/abdev/BasicCompiler32/Compile_CallProc.cpp

@@ -105 +105 @@
     const CMethod *pMethod = NULL;
     Type leftType;
+    bool isFixedClass = false;
     if( pUserProc->GetParentClassPtr() ){
         //クラスのメンバ関数を呼び出す場合はアクセスチェックを行う
-        if(ObjectName[0] && (dwFlags&PROCFLAG_NEW)==0){
-            if(lstrcmpi(ObjectName,"Super")==0){
+        if(ObjectName[0] && (dwFlags&PROCFLAG_NEW)==0)
+        {
+            if(lstrcmpi(ObjectName,"Super")==0)
+            {
                 //クラスメンバ関数内から基底クラスの呼び出し
-                pobj_c=compiler.pCompilingClass;
-            }
-            else{
+                pobj_c=&compiler.pCompilingClass->GetSuperClass();
+
+                isFixedClass = true;
+            }
+            else
+            {
                 //"->"によってオブジェクトを指定する通常のメンバ関数呼び出し
                 Type varType;
@@ -313 +319 @@
     }
 
-    if( pUserProc->IsVirtual() ){
+    if( pUserProc->IsVirtual() && !isFixedClass ){
         //仮想関数（オブジェクトメソッド）呼び出し
         //pObj->func_table->func1

trunk/abdev/BasicCompiler64/Compile_CallProc.cpp

@@ -113 +113 @@
     const CClass *pobj_c = NULL;
     const CMethod *pMethod = NULL;
+    Type leftType;
+    bool isFixedClass = false;
     if( pUserProc->GetParentClassPtr() ){
         //クラスのメンバ関数を呼び出す場合はアクセスチェックを行う
-        if(ObjectName[0] && (dwFlags&PROCFLAG_NEW)==0){
-            if(lstrcmpi(ObjectName,"Super")==0){
+        if(ObjectName[0] && (dwFlags&PROCFLAG_NEW)==0)
+        {
+            if(lstrcmpi(ObjectName,"Super")==0)
+            {
                 //クラスメンバ関数内から基底クラスの呼び出し
-                pobj_c=compiler.pCompilingClass;
-            }
-            else{
+                pobj_c=&compiler.pCompilingClass->GetSuperClass();
+
+                isFixedClass = true;
+            }
+            else
+            {
                 //"->"によってオブジェクトを指定する通常のメンバ関数呼び出し
                 Type varType;
@@ -336 +343 @@
     }
 
-    if( pUserProc->IsVirtual() ){
+    if( pUserProc->IsVirtual() && !isFixedClass ){
         //仮想関数（オブジェクトメソッド）呼び出し
         //pObj->func_table->func1

trunk/abdev/BasicCompiler_Common/MakeExe.cpp

@@ -119 +119 @@
 
     ChangeCommandToCode(basbuf);
+    compiler.GetObjectModule().GetSources()[0]._ResetLength();
 
     //重複エラー情報管理のメモリを解放

trunk/abdev/BasicCompiler_Common/hash.cpp

@@ -63 +63 @@
         bool isStatic = false;
         const CClass *pobj_c = NULL;
-        if(lstrcmpi(ObjName,"Super")==0){
+        if(lstrcmpi(ObjName,"Super")==0)
+        {
             //クラスメンバ関数内から基底クラスの呼び出し
-            pobj_c=compiler.pCompilingClass;
+            pobj_c=&compiler.pCompilingClass->GetSuperClass();
         }
-        else{
+        else
+        {
             //"->"によってオブジェクトを指定する通常のメンバ関数呼び出し
             Type type;
@@ -90 +92 @@
                 pobj_c->GetMethods().Enum( NestMember, subs );
             }
+
             return;
         }

trunk/abdev/BasicCompiler_Common/include/Source.h

@@ -222 +222 @@
         return length-2;
     }
+    void _ResetLength()
+    {
+        length = lstrlen( buffer );
+    }
 
     const IncludedFilesRelation &GetIncludedFilesRelation() const

trunk/abdev/BasicCompiler_Common/include/option.h

@@ -14 +14 @@
 // バージョン付加文字列
 #ifdef _AMD64_
-#define VER_INFO        "(x64) (rev.299)"
+#define VER_INFO        "(x64) (rev.306)"
 #else
-#define VER_INFO        "(rev.299)"
+#define VER_INFO        "(rev.306)"
 #endif