Index: trunk/ab5.0/abdev/BasicCompiler_Common/src/Procedure.cpp
===================================================================
--- trunk/ab5.0/abdev/BasicCompiler_Common/src/Procedure.cpp	(revision 509)
+++ trunk/ab5.0/abdev/BasicCompiler_Common/src/Procedure.cpp	(revision 511)
@@ -502,189 +502,5 @@
 	return true;
 }
-UserProc *UserProcs::AddUserProc( const NamespaceScopes &namespaceScopes, const NamespaceScopesCollection &importedNamespaces, char *buffer,int nowLine,bool isVirtual,CClass *pobj_c, bool isStatic, char *interfaceName )
-{
-	int i2,i3;
-	char temporary[8192];
-
-	int i=1;
-
-	Procedure::Kind kind = Procedure::Sub;
-	bool isMacro = false;
-	if(buffer[i]==ESC_FUNCTION) kind = Procedure::Function;
-	if(buffer[i]==ESC_MACRO){
-		isMacro = true;
-	}
-
-	i++;
-
-	bool isCdecl = false;
-	bool isExport = false;
-	while(1){
-		if(buffer[i]==1&&buffer[i+1]==ESC_CDECL&& isCdecl == false ){
-			isCdecl = true;
-
-			i+=2;
-		}
-		else if(buffer[i]==1&&buffer[i+1]==ESC_EXPORT&& isExport == false ){
-			isExport = true;
-
-			i+=2;
-		}
-		else break;
-	}
-
-	i2=0;
-	if(buffer[i]==1&&buffer[i+1]==ESC_OPERATOR){
-		if(!pobj_c){
-			compiler.errorMessenger.Output(126,NULL,nowLine);
-			return 0;
-		}
-
-		//オペレータの場合
-		temporary[i2++]=buffer[i++];
-		temporary[i2++]=buffer[i++];
-
-		int iCalcId;
-		if(buffer[i]=='='&&buffer[i+1]=='='){
-			iCalcId=CALC_EQUAL;
-			i3=2;
-		}
-		else if(buffer[i]=='='){
-			iCalcId=CALC_SUBSITUATION;
-			i3=1;
-		}
-		else if(buffer[i]=='('){
-			iCalcId=CALC_AS;
-			i3=0;
-		}
-		else if(buffer[i]=='['&&buffer[i+1]==']'&&buffer[i+2]=='='){
-			iCalcId=CALC_ARRAY_SET;
-			i3=3;
-		}
-		else if(buffer[i]=='['&&buffer[i+1]==']'){
-			iCalcId=CALC_ARRAY_GET;
-			i3=2;
-		}
-		else{
-			iCalcId=GetCalcId(buffer+i,&i3);
-			i3++;
-		}
-		if(!iCalcId){
-			compiler.errorMessenger.Output(1,NULL,nowLine);
-			return 0;
-		}
-		temporary[i2++]=iCalcId;
-		temporary[i2]=0;
-
-		i+=i3;
-	}
-	else{
-		if(pobj_c){
-			//クラスメンバの場合、デストラクタには~が付くことを考慮
-			if(buffer[i]=='~'){
-				temporary[i2]='~';
-				i++;
-				i2++;
-			}
-		}
-
-		for(;;i++,i2++){
-			if(!IsVariableChar(buffer[i])){
-				temporary[i2]=0;
-				break;
-			}
-			temporary[i2]=buffer[i];
-		}
-
-		char parentName[VN_SIZE], memberName[VN_SIZE];
-		ReferenceKind refKind;
-		if( SplitMemberName( temporary, parentName, memberName, refKind ) )
-		{
-			if( pobj_c )
-			{
-				if( interfaceName )
-				{
-					lstrcpy( interfaceName, parentName );
-				}
-				else
-				{
-					compiler.errorMessenger.OutputFatalError();
-					return NULL;
-				}
-
-				char dummyMemberName[VN_SIZE];
-				if( SplitMemberName( memberName, parentName, dummyMemberName, refKind ) )
-				{
-					compiler.errorMessenger.Output(69,temporary,nowLine);
-					return NULL;
-				}
-			}
-			else
-			{
-				compiler.errorMessenger.Output(68,temporary,nowLine);
-				return NULL;
-			}
-
-			lstrcpy( temporary, memberName );
-		}
-	}
-
-	if( isMacro ){
-		//大文字に変換
-		CharUpper(temporary);
-
-		//マクロ関数の場合は名前リストに追加
-		macroNames.push_back( temporary );
-	}
-
-	if(!pobj_c){
-		//クラスメンバ以外の場合のみ
-		//重複チェック
-
-		if(GetDeclareHash(temporary)){
-			compiler.errorMessenger.Output(15,temporary,nowLine);
-			return 0;
-		}
-	}
-
-	// 識別ID
-	static int id_base=0;
-
-	UserProc *pUserProc = new UserProc( namespaceScopes, importedNamespaces, temporary, kind, isMacro, isCdecl, isExport, (id_base++) );
-	pUserProc->SetParentClass( pobj_c );
-
-	// 親インターフェイスをセット
-	if( interfaceName && interfaceName[0] )
-	{
-		::Interface *pTargetInterface = NULL;
-		BOOST_FOREACH( ::Interface *pInterface, pobj_c->GetInterfaces() )
-		{
-			if( pInterface->GetClass().GetName() == interfaceName )
-			{
-				pTargetInterface = pInterface;
-				break;
-			}
-		}
-		pUserProc->SetInterface( pTargetInterface );
-	}
-
-	if(isExport){
-		pUserProc->Using();
-	}
-
-	// パラメータを解析
-	// ※第1パラメータにに指定するデータの例："( s As String ) As String"
-	pUserProc->SetParamsAndReturnType( buffer + i, nowLine, isStatic );
-
-	pUserProc->_paramStr = buffer + i;
-
-	// ハッシュに追加
-	if( !Insert( pUserProc, nowLine ) )
-	{
-		return NULL;
-	}
-
-	return pUserProc;
-}
+
 void UserProcs::EnumGlobalProcs( const char *simpleName, const char *localName, std::vector<const UserProc *> &subs )
 {
