Changeset 552 in dev for trunk/ab5.0/abdev/BasicCompiler_Common/src/LexicalAnalyzer_Delegate.cpp
- Timestamp:
- May 5, 2008, 12:53:13 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ab5.0/abdev/BasicCompiler_Common/src/LexicalAnalyzer_Delegate.cpp
r526 r552 3 3 using namespace ActiveBasic::Compiler; 4 4 5 void LexicalAnalyzer::CollectDelegates( const BasicSource &source, Delegates &delegates )5 void LexicalAnalyzer::CollectDelegates( const char *source, Delegates &delegates ) 6 6 { 7 7 int i2; … … 16 16 importedNamespaces.clear(); 17 17 18 for( int i=0; i<source.GetLength(); i++ ) 18 int length = lstrlen( source ); 19 for( int i=0; i<length; i++ ) 19 20 { 20 21 if( source[i] == 1 && source[i+1] == ESC_NAMESPACE ){ … … 81 82 // 名前 82 83 char name[VN_SIZE]; 83 GetIdentifierToken( name, source .GetBuffer(), i );84 GetIdentifierToken( name, source, i ); 84 85 85 86 if( source[i] != '(' ) … … 91 92 // パラメータ文字列 92 93 char paramStr[8192]; 93 i += GetStringInPare( paramStr, source .GetBuffer()+ i, true );94 i += GetStringInPare( paramStr, source + i, true ); 94 95 95 96 // 戻り値の型の文字列 … … 98 99 { 99 100 i += 2; 100 GetCommandToken( returnTypeName, source .GetBuffer(), i );101 GetCommandToken( returnTypeName, source, i ); 101 102 102 103 if( procKind != Procedure::Function )
Note:
See TracChangeset
for help on using the changeset viewer.