Changeset 309 in dev for trunk/abdev/BasicCompiler64/Compile_ProcOp.cpp

Timestamp:

Aug 29, 2007, 9:19:17 AM (17 years ago)

Author:

dai_9181

Message:

 

File:

• trunk/abdev/BasicCompiler64/Compile_ProcOp.cpp (modified) (2 diffs)

trunk/abdev/BasicCompiler64/Compile_ProcOp.cpp

@@ -146 +146 @@
 
             Compile_AddGlobalRootsForGc();
+    }
+    else if( userProc.GetName() == compiler.globalAreaProcName ){
+        ////////////////////////////////////////
+        // グローバル領域をコンパイル
+        ////////////////////////////////////////
+
+        const UserProc *pBackUserProc = &UserProc::CompilingUserProc();
+        UserProc::CompileStartForGlobalArea();
+
+        int BackCp = cp;
+        cp=-1;
+
+        //クラスに属する静的メンバを定義
+        compiler.GetObjectModule().meta.GetClasses().InitStaticMember();
+
+        //グローバル実行領域をコンパイル開始
+        CompileBuffer(0,0);
+
+        //Goto未知ラベルスケジュールが存在したらエラーにする
+        BOOST_FOREACH( const GotoLabelSchedule *pGotoLabelSchedule, compiler.codeGenerator.gotoLabelSchedules )
+        {
+            if(pGotoLabelSchedule->GetName().size()>0){
+                SetError(6,pGotoLabelSchedule->GetName(),pGotoLabelSchedule->GetSourceCodePos());
+            }
+            else{
+                char temporary[255];
+                sprintf(temporary,"%d",pGotoLabelSchedule->GetLineNum());
+                SetError(6,temporary,pGotoLabelSchedule->GetSourceCodePos());
+            }
+        }
+
+        UserProc::CompileStartForUserProc( pBackUserProc );
+        cp=BackCp;
     }
     else{
@@ -691 +724 @@
         else SetError(300,NULL,cp);
     }
+    else
+    {
+        // グローバル領域を一番初めにコンパイルする
+        extern const UserProc *pSub_System_GlobalArea;
+        CompileBufferInProcedure( *pSub_System_GlobalArea );
+    }
 
     //_System_TypeBase_InitializeUserTypesは一番最後にコンパイル