Changeset 36 in dev for BasicCompiler_Common/Overload.cpp

Timestamp:

Jan 20, 2007, 4:55:26 AM (18 years ago)

Author:

dai_9181

Message:

Boolean型に対応。

File:

• BasicCompiler_Common/Overload.cpp (modified) (1 diff)

BasicCompiler_Common/Overload.cpp

@@ -46 +46 @@
 }
 
-BOOL OverloadCheck(PARAMETER_INFO *ppi1,int ParmNum1,PARAMETER_INFO *ppi2,int ParmNum2){
-    //パラメータの個数が不一致の場合
-    if(ParmNum1!=ParmNum2) return 0;
-
-    int i;
-    for(i=0;i<ParmNum1;i++){
-        if(ppi1[i].type!=ppi2[i].type) return 0;
-        else{
-            if(NATURAL_TYPE(ppi1[i].type)==DEF_OBJECT){
-                if(ppi1[i].u.index!=ppi2[i].u.index) return 0;
-            }
-        }
-    }
-
-    return 1;
-}
-BOOL OverloadCheckLevel2(PARAMETER_INFO *ppi1,int ParmNum1,PARAMETER_INFO *ppi2,int ParmNum2){
-    //パラメータの個数が不一致の場合
-    if(ParmNum1!=ParmNum2) return 0;
-
-    int i;
-    for(i=0;i<ParmNum1;i++){
-        if(ppi1[i].type!=ppi2[i].type){
-            if(!(
-                IsNaturalWholeNumberType(ppi1[i].type)&&IsNaturalWholeNumberType(ppi2[i].type)||
-                IsRealNumberType(ppi1[i].type)&&IsRealNumberType(ppi2[i].type)
-                )) return 0;
-        }
-        else{
-            if(NATURAL_TYPE(ppi1[i].type)==DEF_OBJECT){
-                if(ppi1[i].u.index!=ppi2[i].u.index) return 0;
-            }
-        }
-    }
-
-    return 1;
-}
 SUBINFO *OverloadSolution(char *name,SUBINFO **ppsi,int num,PARAMETER_INFO *ppi,int ParmNum,TYPEINFO *pReturnTypeInfo){
     // オーバーロードの解決