Changeset 62 in dev for BasicCompiler32/Compile_Set_Var.cpp

Timestamp:

Feb 22, 2007, 3:57:56 AM (18 years ago)

Author:

dai_9181

Message:

グローバル変数に対してByRefを指定できるようにした

File:

• BasicCompiler32/Compile_Set_Var.cpp (modified) (7 diffs)

BasicCompiler32/Compile_Set_Var.cpp

@@ -121 +121 @@
             obp+=sizeof(long);
         }
+    }
+    else if( VarKind==VAR_REFGLOBAL ){
+        SetError(300,NULL,cp);
     }
     else if(VarKind==VAR_LOCAL){
@@ -278 +281 @@
             obp+=sizeof(long);
         }
+    }
+    else if( VarKind==VAR_REFGLOBAL ){
+        SetError(300,NULL,cp);
     }
     else if(VarKind==VAR_LOCAL){
@@ -430 +436 @@
         }
     }
+    else if(pRelative->dwKind==VAR_REFLOCAL){
+        if(pRelative->bOffsetOffset){
+            //add ecx,dword ptr[offset]
+            op_add_RM( sizeof(long), REG_ECX, REG_NON, (int)pRelative->offset, MOD_DISP32 );
+        }
+        else{
+            //mov ecx,dword ptr[offset]
+            op_mov_RM( sizeof(long), REG_ECX, REG_NON, (int)pRelative->offset, MOD_DISP32 );
+        }
+        obp-=sizeof(long);
+        pobj_GlobalVarSchedule->add();
+        obp+=sizeof(long);
+
+        //mov dword ptr[ecx],eax
+        OpBuffer[obp++]=(char)0x89;
+        OpBuffer[obp++]=(char)0x01;
+
+        //mov dword ptr[ecx+sizeof(long)],edx
+        OpBuffer[obp++]=(char)0x89;
+        OpBuffer[obp++]=(char)0x51;
+        OpBuffer[obp++]=(char)0x04;
+    }
     else if(pRelative->dwKind==VAR_LOCAL){
         if(pRelative->bOffsetOffset){
@@ -573 +601 @@
             obp+=sizeof(long);
         }
+    }
+    else if(VarKind==VAR_REFGLOBAL){
+        if(bOffsetOffset){
+            //add ecx,dword ptr[offset]
+            op_add_RM( sizeof(long), REG_ECX, REG_NON, (int)offset, MOD_DISP32 );
+        }
+        else{
+            //mov ecx,dword ptr[offset]
+            op_mov_RM( sizeof(long), REG_ECX, REG_NON, (int)offset, MOD_DISP32 );
+        }
+        obp-=sizeof(long);
+        pobj_GlobalVarSchedule->add();
+        obp+=sizeof(long);
+
+        //mov dword ptr[ecx],eax
+        OpBuffer[obp++]=(char)0x89;
+        OpBuffer[obp++]=(char)0x01;
     }
     else if(VarKind==VAR_LOCAL){
@@ -665 +710 @@
             }
         }
+        else if(VarKind==VAR_REFGLOBAL){
+            //mov eax,dword ptr[offset]
+            op_mov_RM( sizeof(long), REG_EAX, REG_NON, (int)offset, MOD_DISP32 );
+            obp-=sizeof(long);
+            pobj_GlobalVarSchedule->add();
+            obp+=sizeof(long);
+
+            if(bOffsetOffset){
+                //add eax,ecx
+                OpBuffer[obp++]=(char)0x03;
+                OpBuffer[obp++]=(char)0xC1;
+            }
+
+            //fistp dword ptr[eax]
+            fpu_cast();
+            OpBuffer[obp++]=(char)0xDB;
+            OpBuffer[obp++]=(char)0x18;
+            fpu_cast_end();
+        }
         else if(VarKind==VAR_LOCAL){
             if(bOffsetOffset){
@@ -751 +815 @@
         }
     }
+    else if(VarKind==VAR_REFGLOBAL){
+        //mov ebx,dword ptr[offset]
+        op_mov_RM( sizeof(long), REG_EBX, REG_NON, (int)offset, MOD_DISP32 );
+        obp-=sizeof(long);
+        pobj_GlobalVarSchedule->add();
+        obp+=sizeof(long);
+
+        if(bOffsetOffset){
+            //add ebx,ecx
+            OpBuffer[obp++]=(char)0x03;
+            OpBuffer[obp++]=(char)0xD9;
+        }
+
+        //mov word ptr[ebx],ax
+        OpBuffer[obp++]=(char)0x66;
+        OpBuffer[obp++]=(char)0x89;
+        OpBuffer[obp++]=(char)0x03;
+    }
     else if(VarKind==VAR_LOCAL){
         if(bOffsetOffset){
@@ -826 +908 @@
         }
     }
+    else if(VarKind==VAR_REFGLOBAL){
+        //mov ebx,dword ptr[offset]
+        op_mov_RM( sizeof(long), REG_EBX, REG_NON, (int)offset, MOD_DISP32 );
+        obp-=sizeof(long);
+        pobj_GlobalVarSchedule->add();
+        obp+=sizeof(long);
+
+        if(bOffsetOffset){
+            //add ebx,ecx
+            OpBuffer[obp++]=(char)0x03;
+            OpBuffer[obp++]=(char)0xD9;
+        }
+
+        //mov byte ptr[ebx],al
+        OpBuffer[obp++]=(char)0x88;
+        OpBuffer[obp++]=(char)0x03;
+    }
     else if(VarKind==VAR_LOCAL){
         if(bOffsetOffset){