Changeset 250 in dev for trunk/abdev/BasicCompiler_Common

Timestamp:

Jul 29, 2007, 9:30:14 PM (17 years ago)

Author:

dai_9181

Message:

Selectステートメントのスケジュール機構をリファクタリング

Location:

trunk/abdev/BasicCompiler_Common

Files:

• Compile.cpp (modified) (1 diff)
• include/CodeGenerator.h (modified) (2 diffs)
• include/NativeCode.h (modified) (3 diffs)
• src/CommonCodeGenerator.cpp (modified) (1 diff)
• src/NativeCode.cpp (modified) (1 diff)

trunk/abdev/BasicCompiler_Common/Compile.cpp

@@ -23 +23 @@
 LABEL *pLabelNames;
 int MaxLabelNum;
-
-//Caseスケジュール
-DWORD *pCaseSchedule;
-int CaseScheduleNum;
-int NowCaseSchedule;
 
 //グローバル変数初期バッファ

trunk/abdev/BasicCompiler_Common/include/CodeGenerator.h

@@ -265 +265 @@
     const PertialSchedule *__jmp_op_format( char opcode, long offset, int op_size, bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
 public:
-    const PertialSchedule *op_jle( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_jbe( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_jge( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_jae( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_jl( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_jb( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_jg( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_ja( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_jne( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
-    const PertialSchedule *op_je( long offset, int op_size = sizeof(char), bool isPertialSchedule = false );
+    const PertialSchedule *op_jle( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_jbe( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_jge( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_jae( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_jl( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_jb( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_jg( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_ja( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_jne( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
+    const PertialSchedule *op_je( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
     const PertialSchedule *op_jmp( long offset, int op_size = sizeof(char), bool isPertialSchedule = false, bool isSelfOpcodeOffset = false );
     void op_jmp_continue();
@@ -435 +435 @@
     void op_call_R( int reg );
     void op_call(const UserProc *pUserProc);
+    void op_call(const DllProc *pDllProc);
     void op_ret();
     void op_ret( short stackFrameSize );

trunk/abdev/BasicCompiler_Common/include/NativeCode.h

@@ -33 +33 @@
         LONG_PTR lpValue;
         const ::UserProc *pUserProc;
+        const ::DllProc *pDllProc;
     };
 
@@ -58 +59 @@
         , offset( offset )
         , pUserProc( pUserProc )
+    {
+    }
+    Schedule( const ::DllProc *pDllProc, long offest )
+        : type( Schedule::UserProc )
+        , offset( offset )
+        , pDllProc( pDllProc )
     {
     }
@@ -242 +249 @@
     }
     void PutUserProcSchedule( const UserProc *pUserProc, bool isCall );
+    void PutDllProcSchedule( const DllProc *pDllProc );
     void Put( short s )
     {

trunk/abdev/BasicCompiler_Common/src/CommonCodeGenerator.cpp

@@ -158 +158 @@
     return pPertialSchedule;
 }
-const PertialSchedule *CodeGenerator::op_jle( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x0E, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_jbe( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x06, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_jge( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x0D, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_jae( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x03, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_jl( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x0C, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_jb( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x02, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_jg( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x0F, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_ja( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x07, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_jne( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x05, offset, op_size, isPertialSchedule );
-}
-const PertialSchedule *CodeGenerator::op_je( long offset, int op_size, bool isPertialSchedule )
-{
-    return __jmp_op_format( (char)0x04, offset, op_size, isPertialSchedule );
+const PertialSchedule *CodeGenerator::op_jle( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x0E, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_jbe( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x06, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_jge( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x0D, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_jae( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x03, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_jl( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x0C, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_jb( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x02, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_jg( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x0F, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_ja( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x07, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_jne( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x05, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
+}
+const PertialSchedule *CodeGenerator::op_je( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )
+{
+    return __jmp_op_format( (char)0x04, offset, op_size, isPertialSchedule, isSelfOpcodeOffset );
 }
 const PertialSchedule *CodeGenerator::op_jmp( long offset, int op_size, bool isPertialSchedule, bool isSelfOpcodeOffset )

trunk/abdev/BasicCompiler_Common/src/NativeCode.cpp

@@ -48 +48 @@
     ObpPlus( sizeof(long) );
 }
+
+void NativeCode::PutDllProcSchedule( const DllProc *pDllProc )
+{
+    pDllProc->Using();
+
+    schedules.push_back( Schedule( pDllProc, size ) );
+
+    *((long *)(codeBuffer+size))=0;
+    size += sizeof(long);
+
+
+
+    // 未完成
+    pobj_ImportAddrSchedule->add(pDllProc);
+    extern char *OpBuffer;
+    extern int obp;
+    *((long *)(OpBuffer+obp))=0;
+    ObpPlus( sizeof(long) );
+}