Changeset 632 in dev for trunk/ab5.0/abdev/compiler_x86

Timestamp:

Jun 5, 2008, 10:04:39 PM (16 years ago)

Author:

dai_9181

Message:

ジェネリッククラスの型パラメータに値型が指定されたときに限り、テンプレート展開を行うようにした。

TODO: libファイルを跨ってテンプレート展開ができていないため、ソースコード管理部分に手を加える必要あり。

Location:

trunk/ab5.0/abdev/compiler_x86

Files:

• Compile_ProcOp.cpp (modified) (2 diffs)
• Compile_Var.cpp (modified) (1 diff)
• MakePeHdr.cpp (modified) (2 diffs)
• NumOpe.cpp (modified) (1 diff)

trunk/ab5.0/abdev/compiler_x86/Compile_ProcOp.cpp

@@ -289 +289 @@
     }
 
-    trace_for_sourcecodestep( "★★★ " << pUserProc->GetFullName() << "のコンパイルを開始" );
+    trace_for_sourcecodestep( "★★★ " << FormatEscapeSequenceStringToDefaultString( pUserProc->GetFullName() ) << "のコンパイルを開始" );
 
     pUserProc->CompleteCompile();
@@ -330 +330 @@
     if( !pUserProc->IsAutoGeneration() )
     {
-        cp=pUserProc->GetCodePos();
+        cp=pUserProc->GetSourceCodePosition().GetPos();
         for(;;cp++){
             if(IsCommandDelimitation(basbuf[cp])) break;

trunk/ab5.0/abdev/compiler_x86/Compile_Var.cpp

@@ -540 +540 @@
             }
 
-            int typeDefIndex = compiler.GetObjectModule().meta.GetTypeDefs().GetIndex(
+            const TypeDef *pTypeDef = compiler.GetObjectModule().meta.GetTypeDefs().Find(
                 LexicalAnalyzer::FullNameToSymbol( VarName )
             );
-            if( typeDefIndex != -1 ){
+            if( pTypeDef )
+            {
                 // TypeDef後の型名だったとき
-                lstrcpy( VarName, compiler.GetObjectModule().meta.GetTypeDefs()[typeDefIndex].GetBaseName().c_str() );
+                lstrcpy( VarName, pTypeDef->GetBaseName().c_str() );
             }
 

trunk/ab5.0/abdev/compiler_x86/MakePeHdr.cpp

@@ -576 +576 @@
 
             if(!hLib){
-                compiler.errorMessenger.Output(-106,pDllProc->GetDllFileName().c_str(),pDllProc->GetCodePos());
+                compiler.errorMessenger.Output(-106,pDllProc->GetDllFileName().c_str(),pDllProc->GetSourceCodePosition().GetPos());
             }
         }
@@ -583 +583 @@
             if(!GetProcAddress(hLib,pDllProc->GetAlias().c_str())){
                 FreeLibrary(hLib);
-                compiler.errorMessenger.Output(-107,pDllProc->GetAlias(),pDllProc->GetCodePos());
+                compiler.errorMessenger.Output(-107,pDllProc->GetAlias(),pDllProc->GetSourceCodePosition().GetPos());
             }
             FreeLibrary(hLib);

trunk/ab5.0/abdev/compiler_x86/NumOpe.cpp

@@ -1032 +1032 @@
                         isNothing_stack[sp] = true;
 
-                        type_stack[sp] = DEF_OBJECT;
                         if( baseType.IsObject() ){
+                            type_stack[sp] = DEF_OBJECT;
                             index_stack[sp] = baseType.GetIndex();
                         }
                         else{
-                            index_stack[sp] = (LONG_PTR)compiler.GetObjectModule().meta.GetClasses().GetObjectClassPtr();
+                            type_stack[sp] = baseType.GetBasicType();
+                            index_stack[sp] = baseType.GetIndex();
                         }