Changeset 283 in dev for trunk/abdev

Timestamp:

Aug 15, 2007, 3:22:56 AM (17 years ago)

Author:

dai_9181

Message:

 

Location:

trunk/abdev

Files:

• BasicCompiler32/CParameter.cpp (modified) (1 diff)
• BasicCompiler32/Compile_ProcOp.cpp (modified) (1 diff)
• BasicCompiler32/MakePeHdr.cpp (modified) (2 diffs)
• BasicCompiler_Common/src/Meta.cpp (modified) (1 diff)
• BasicCompiler_Common/src/Source.cpp (modified) (1 diff)

trunk/abdev/BasicCompiler32/CParameter.cpp

@@ -220 +220 @@
             if(Parms[i2][0]==1&&Parms[i2][1]==ESC_BYVAL){
                 char temp2[255];
-                sprintf(temp2,"%s関数の第%dパラメータ",procName,i2+1);
+                sprintf(temp2,"%s関数の第%dパラメータ",procName.c_str(),i2+1);
                 SetError(19,temp2,cp);
                 continue;

trunk/abdev/BasicCompiler32/Compile_ProcOp.cpp

@@ -751 +751 @@
 
 void CompileBufferInProcedure( const UserProc &userProc ){
-    if( userProc.IsUsing() == false || userProc.IsCompiled() ) return;
+    if( userProc.IsCompiled() ) return;
 
     _compile_proc( &userProc );

trunk/abdev/BasicCompiler32/MakePeHdr.cpp

@@ -401 +401 @@
         InitGCVariables();
 
-        //_System_StartupProgramの呼び出し
-        compiler.codeGenerator.op_call(pSub_System_StartupProgram);
+        if( compiler.IsStaticLibrary() ){
+            //_System_StartupProgramの呼び出し
+            compiler.codeGenerator.op_call(pSub_System_StartupProgram);
+        }
 
         //クラスに属する静的メンバを定義
@@ -423 +425 @@
 
 
-        ///////////////////////////////////////
-        // グローバル文字列変数の解放処理
-        ///////////////////////////////////////
-
-        //call _System_End
-        extern const UserProc *pSub_System_End;
-        compiler.codeGenerator.op_call(pSub_System_End);
-
-
-        //xor eax,eax（eaxを0に初期化する）
-        compiler.codeGenerator.op_zero_reg(REG_EAX);
-
-        //pop ebp
-        compiler.codeGenerator.op_pop(REG_EBP);
-
-        //ret
-        compiler.codeGenerator.op_ret();
+        if( !compiler.IsStaticLibrary() )
+        {
+            ///////////////////////////////////////
+            // グローバル文字列変数の解放処理
+            ///////////////////////////////////////
+
+            //call _System_End
+            extern const UserProc *pSub_System_End;
+            compiler.codeGenerator.op_call(pSub_System_End);
+
+
+            //xor eax,eax（eaxを0に初期化する）
+            compiler.codeGenerator.op_zero_reg(REG_EAX);
+
+            //pop ebp
+            compiler.codeGenerator.op_pop(REG_EBP);
+
+            //ret
+            compiler.codeGenerator.op_ret();
+        }
 
         //グローバル実行領域のコードサイズ

trunk/abdev/BasicCompiler_Common/src/Meta.cpp

@@ -84 +84 @@
     BOOST_FOREACH( Variable *pVar, meta.globalVars )
     {
+        // 基底スコープレベルのグローバル変数の生存値をオンにする
+        if( pVar->GetScopeLevel() == 0 )
+        {
+            pVar->bLiving = TRUE;
+        }
+
         pVar->isTargetObjectModule = false;
         this->globalVars.Add( pVar );

trunk/abdev/BasicCompiler_Common/src/Source.cpp

@@ -815 +815 @@
 
     // basic.sbpをインクルード
-    //const char *headCode = "#include <basic.sbp>\n";
-    const char *headCode = "\n";
+    const char *headCode = "#include <basic.sbp>\n";
+    //const char *headCode = "\n";
     Realloc( length + lstrlen(headCode) );
     Text::SlideString( buffer, lstrlen(headCode) );