Changeset 448 in dev for trunk/ab5.0/abdev/BasicCompiler_Common/error.cpp

Timestamp:

Mar 21, 2008, 7:34:57 PM (16 years ago)

Author:

dai_9181

Message:

・デリゲートの共変戻り値、反変引数に対応した。
・core.libで定義されたデリゲートがアプリケーションプロジェクトで利用できないバグを修正。

File:

• trunk/ab5.0/abdev/BasicCompiler_Common/error.cpp (modified) (1 diff)

trunk/ab5.0/abdev/BasicCompiler_Common/error.cpp

@@ -470 +470 @@
         }
 
-        if( !varType.GetClass().IsEqualsOrSubClass( &calcType.GetClass() ) )
-        {
-            //等しくなく、派生クラスでもないとき
-            DifferentTypeError( varType, calcType,3,pszFuncName,ParmNum);
-            return false;
+        if( varType.IsDelegate() && calcType.IsDelegate() )
+        {
+            // デリゲート同士の比較の場合
+            // ※共変戻り値及び反辺引数をサポートすること
+            if( !varType.GetClass().GetDelegate().IsSimilar( calcType.GetClass().GetDelegate() ) )
+            {
+                // 等しいと見なされないとき
+                DifferentTypeError( varType, calcType,3,pszFuncName,ParmNum);
+                return false;
+            }
+        }
+        else
+        {
+            // 一般的なクラスの比較の場合
+
+            if( !varType.GetClass().IsEqualsOrSubClass( &calcType.GetClass() ) )
+            {
+                //等しくなく、派生クラスでもないとき
+                DifferentTypeError( varType, calcType,3,pszFuncName,ParmNum);
+                return false;
+            }
         }
     }