Changeset 193 in dev for trunk/abdev/BasicCompiler32/Compile_ProcOp.cpp
- Timestamp:
- Jun 26, 2007, 5:04:50 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abdev/BasicCompiler32/Compile_ProcOp.cpp
r183 r193 3 3 4 4 #include <Program.h> 5 #include <Compiler.h> 5 6 #include <LexicalScopingImpl.h> 6 7 #include <ClassImpl.h> 8 #include <VariableImpl.h> 7 9 8 10 #include "../BasicCompiler_Common/common.h" … … 55 57 56 58 //クラスに属する静的メンバを定義 57 Smoothie::GetMeta().GetClasses().InitStaticMember();59 compiler.GetMeta().GetClasses().InitStaticMember(); 58 60 59 61 GetGlobalDataForDll(); … … 224 226 && userProc.GetParentClass().GetName() == "_System_TypeBase" ){ 225 227 226 Smoothie::GetMeta().GetClasses().Compile_System_InitializeUserTypes();228 compiler.GetMeta().GetClasses().Compile_System_InitializeUserTypes(); 227 229 } 228 230 else if( userProc.GetName() == "RegisterGlobalRoots" … … 273 275 274 276 //コンパイルスタートをクラス管理クラスに追加 275 Smoothie::GetMeta().GetClasses().StartCompile( pUserProc );277 compiler.GetMeta().GetClasses().StartCompile( pUserProc ); 276 278 277 279 //コンパイル中の関数 … … 282 284 283 285 // コンパイル中の関数でImportsされている名前空間 284 Smoothie::Temp::importedNamespaces = pUserProc->GetImportedNamespaces();286 compiler.SetImportedNamespaces( pUserProc->GetImportedNamespaces() ); 285 287 286 288 if(pUserProc->IsSystem()){ … … 318 320 Parameter ¶m = *pUserProc->RealParams()[i3]; 319 321 320 Variable *pVar = new Variable ( param.GetVarName(), param, false, param.IsRef() );322 Variable *pVar = new VariableImpl( param.GetVarName(), param, false, param.IsRef() ); 321 323 322 324 if( param.IsArray() ){ … … 395 397 else{ 396 398 if( pUserProc->ReturnType().IsObject() ){ 397 sprintf(temporary,"%s=Nothing%c%c%s",temp,1,ESC_AS, pUserProc->ReturnType().ToString().c_str() );399 sprintf(temporary,"%s=Nothing%c%c%s",temp,1,ESC_AS, Compiler::TypeToString( pUserProc->ReturnType() ).c_str() ); 398 400 } 399 401 else{ 400 402 //戻り値用の変数の定義 401 sprintf(temporary,"%s%c%c%s",temp,1,ESC_AS, pUserProc->ReturnType().ToString().c_str() );403 sprintf(temporary,"%s%c%c%s",temp,1,ESC_AS, Compiler::TypeToString( pUserProc->ReturnType() ).c_str() ); 402 404 } 403 405
Note:
See TracChangeset
for help on using the changeset viewer.