Changeset 546 in dev for trunk/ab5.0/abdev/BasicCompiler_Common/src/LexicalAnalyzer_Class.cpp

Timestamp:

May 4, 2008, 9:36:46 PM (16 years ago)

Author:

dai_9181

Message:

LexicalAnalyzerのソースコードの記述位置を整理。

File:

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

trunk/ab5.0/abdev/BasicCompiler_Common/src/LexicalAnalyzer_Class.cpp

@@ -13 +13 @@
 
 using namespace ActiveBasic::Compiler;
+
+
+void LexicalAnalyzer::CollectClassesForNameOnly( const char *source, Classes &classes )
+{
+    int i, i2;
+    char temporary[VN_SIZE];
+
+    // 名前空間管理
+    NamespaceScopes &namespaceScopes = compiler.GetNamespaceSupporter().GetLivingNamespaceScopes();
+    namespaceScopes.clear();
+
+    // Importsされた名前空間の管理
+    NamespaceScopesCollection &importedNamespaces = compiler.GetNamespaceSupporter().GetImportedNamespaces();
+    importedNamespaces.clear();
+
+    for(i=0;;i++){
+        if(source[i]=='\0') break;
+
+        if( source[i] == 1 && source[i+1] == ESC_NAMESPACE ){
+            for(i+=2,i2=0;;i2++,i++){
+                if( IsCommandDelimitation( source[i] ) ){
+                    temporary[i2]=0;
+                    break;
+                }
+                temporary[i2]=source[i];
+            }
+            namespaceScopes.push_back( temporary );
+
+            continue;
+        }
+        else if( source[i] == 1 && source[i+1] == ESC_ENDNAMESPACE ){
+            if( namespaceScopes.size() <= 0 ){
+                compiler.errorMessenger.Output(12, "End Namespace", i );
+            }
+            else{
+                namespaceScopes.pop_back();
+            }
+
+            i += 2;
+            continue;
+        }
+        else if( source[i] == 1 && source[i+1] == ESC_IMPORTS ){
+            for(i+=2,i2=0;;i2++,i++){
+                if( IsCommandDelimitation( source[i] ) ){
+                    temporary[i2]=0;
+                    break;
+                }
+                temporary[i2]=source[i];
+            }
+            if( !compiler.GetNamespaceSupporter().ImportsNamespace( temporary ) )
+            {
+                compiler.errorMessenger.Output(64,temporary,i );
+            }
+
+            continue;
+        }
+        else if( source[i] == 1 && source[i+1] == ESC_CLEARNAMESPACEIMPORTED ){
+            importedNamespaces.clear();
+            continue;
+        }
+
+        if(source[i]==1&&(
+            source[i+1]==ESC_CLASS||
+            source[i+1]==ESC_TYPE||
+            source[i+1]==ESC_INTERFACE
+            ))
+        {
+            int nowLine = i;
+            i += 2;
+
+            Type blittableType;
+            if(memicmp(source+i,"Align(",6)==0){
+                //アラインメント修飾子
+                i+=6;
+                i=JumpStringInPare(source,i)+1;
+            }
+            else if( memicmp( source + i, "Blittable(", 10 ) == 0 ){
+                // Blittable修飾子
+                i+=10;
+                i+=GetStringInPare_RemovePare(temporary,source+i)+1;
+                compiler.StringToType( temporary, blittableType );
+            }
+
+            bool isEnum = false;
+            bool isDelegate = false;
+            if( source[i] == 1 && source[i+1] == ESC_ENUM ){
+                // 列挙型の場合
+                isEnum = true;
+
+                i += 2;
+            }
+            else if( source[i] == 1 && source[i+1] == ESC_DELEGATE )
+            {
+                // デリゲートの場合
+                isDelegate = true;
+
+                i += 2;
+            }
+
+            for(i2=0;;i++,i2++){
+                if(!IsVariableChar(source[i])){
+                    temporary[i2]=0;
+                    break;
+                }
+                temporary[i2]=source[i];
+            }
+
+            //クラスを追加
+            CClass *pClass = classes.Add(namespaceScopes, importedNamespaces, temporary,nowLine);
+            if( pClass ){
+                if( source[nowLine+1] == ESC_CLASS ){
+                    if( isEnum )
+                    {
+                        pClass->SetClassType( CClass::Enum );
+                    }
+                    else if( isDelegate )
+                    {
+                        pClass->SetClassType( CClass::Delegate );
+                    }
+                    else{
+                        pClass->SetClassType( CClass::Class );
+                    }
+                }
+                else if( source[nowLine+1] == ESC_INTERFACE ){
+                    pClass->SetClassType( CClass::Interface );
+                }
+                else{
+                    pClass->SetClassType( CClass::Structure );
+                }
+            }
+
+            // Blittable型の場合
+            if( !blittableType.IsNull() ){
+                pClass->SetBlittableType( blittableType );
+
+                // Blittable型として登録
+                compiler.GetObjectModule().meta.GetBlittableTypes().push_back( BlittableType( blittableType, pClass ) );
+            }
+        }
+    }
+}