Changeset 55 in dev for BasicCompiler64

Timestamp:

Feb 13, 2007, 3:14:57 AM (17 years ago)

Author:

dai_9181

Message:

・コマンドラインオプション "/unicode" に対応。
・Unicode文字セットを使用する場合に "UNICODE" が自動的に#defineされるようにしました。
・SByte型（8ビット符号付き整数型）を追加。
・Char型を文字型に変更。
・プロジェクトオプションから「Unicode文字セットを使用する」チェックを選択できるようにしました。

Location:

BasicCompiler64

Files:

• Compile_Calc.cpp (modified) (2 diffs)
• Compile_Var.cpp (modified) (3 diffs)
• NumOpe_TypeOperation.cpp (modified) (5 diffs)
• varlist.cpp (modified) (2 diffs)

BasicCompiler64/Compile_Calc.cpp

@@ -11 +11 @@
         SetBooleanVariable(CalcType,pRelativeVar);
     }
-    if(VarType==DEF_CHAR||VarType==DEF_BYTE){
+    else if(VarType==DEF_SBYTE||VarType==DEF_BYTE || (isUnicode==false&&VarType==DEF_CHAR)){
         //8ビット変数へalレジスタの内容を格納する
         SetWholeVariable(sizeof(char),CalcType,pRelativeVar);
     }
-    else if(VarType==DEF_INTEGER||VarType==DEF_WORD){
+    else if(VarType==DEF_INTEGER||VarType==DEF_WORD || (isUnicode&&VarType==DEF_CHAR)){
         //16ビット変数へaxレジスタの内容を格納する
         SetWholeVariable(sizeof(short),CalcType,pRelativeVar);
@@ -34 +34 @@
         //Single型変数へスタックの内容を格納する
         SetSingleVariable(CalcType,pRelativeVar);
+    }
+    else{
+        SetError(300,NULL,cp);
     }
 }

BasicCompiler64/Compile_Var.cpp

@@ -909 +909 @@
     else if(type==DEF_LONG||type==DEF_DWORD)
         *(DWORD *)(initGlobalBuf+offset)=(DWORD)i64data;
-    else if(type==DEF_INTEGER||type==DEF_WORD)
+    else if(type==DEF_INTEGER||type==DEF_WORD || (isUnicode&&type==DEF_CHAR))
         *(WORD *)(initGlobalBuf+offset)=(WORD)i64data;
-    else if(type==DEF_CHAR||type==DEF_BYTE||type==DEF_BOOLEAN)
+    else if(type==DEF_SBYTE||type==DEF_BYTE||type==DEF_BOOLEAN || (isUnicode==false&&type==DEF_CHAR))
         *(BYTE *)(initGlobalBuf+offset)=(BYTE)i64data;
 
@@ -1079 +1079 @@
         obp+=sizeof(long)+sizeof(long);
     }
-    else if(type==DEF_INTEGER||type==DEF_WORD){
+    else if(type==DEF_INTEGER||type==DEF_WORD || (isUnicode&&type==DEF_CHAR)){
         //mov word ptr[rsp+offset],value
         op_mov_MV(sizeof(short),REG_RSP,offset,USE_OFFSET,(int)i64data);
@@ -1086 +1086 @@
         obp+=sizeof(long)+sizeof(short);
     }
-    else if(type==DEF_CHAR||type==DEF_BYTE||type==DEF_BOOLEAN){
+    else if(type==DEF_SBYTE||type==DEF_BYTE||type==DEF_BOOLEAN || (isUnicode==false&&type==DEF_CHAR)){
         //mov byte ptr[rsp+offset],value
         op_mov_MV(sizeof(char),REG_RSP,offset,USE_OFFSET,(int)i64data);

BasicCompiler64/NumOpe_TypeOperation.cpp

@@ -10 +10 @@
         //and reg,00000000FFFFFFFFh
     }
-    else if(type==DEF_INTEGER){
+    else if(type==DEF_INTEGER || (isUnicode&&type==DEF_CHAR)){
         //movsx reg64,reg16
         op_movsx64_FromReg16(reg,reg);
@@ -18 +18 @@
         op_and64_value(reg,(int)0xFFFF);
     }
-    else if(type==DEF_CHAR){
+    else if(type==DEF_SBYTE || (isUnicode==false&&type==DEF_CHAR)){
         //movsx reg64,reg8
         op_movsx64_FromReg8(reg,reg);
@@ -28 +28 @@
 }
 void ExtendTypeTo32(int type,int reg){
-    if(type==DEF_INTEGER){
+    if(type==DEF_INTEGER || (isUnicode&&type==DEF_CHAR)){
         //movsx reg32,reg16
         op_movsx32_FromReg16(reg,reg);
@@ -36 +36 @@
         op_and32_value(reg,(int)0xFFFF);
     }
-    else if(type==DEF_CHAR){
+    else if(type==DEF_SBYTE || (isUnicode==false&&type==DEF_CHAR)){
         //movsx reg32,reg8
         op_movsx32_FromReg8(reg,reg);
@@ -46 +46 @@
 }
 void ExtendTypeTo16(int type,int reg){
-    if(type==DEF_CHAR){
+    if(type==DEF_SBYTE || (isUnicode==false&&type==DEF_CHAR)){
         //movsx reg16,reg8
         op_movsx16_FromReg8(reg,reg);

BasicCompiler64/varlist.cpp

@@ -104 +104 @@
             else sprintf(lptv->item.pszText,"%s %s",VarName,STRING_CANNOTACCESS);
         }
-        else if(type==DEF_INTEGER){
+        else if(type==DEF_INTEGER || (isUnicode&&type==DEF_CHAR)){
             if(ReadProcessMemory(hDebugProcess,(void *)offset,&wData,sizeof(WORD),&stAccBytes)){
                 sprintf(lptv->item.pszText,"%s %d(&H%X)",VarName,(short)wData,(short)wData);
@@ -116 +116 @@
             else sprintf(lptv->item.pszText,"%s %s",VarName,STRING_CANNOTACCESS);
         }
-        else if(type==DEF_CHAR){
+        else if(type==DEF_SBYTE || (isUnicode==false&&type==DEF_CHAR)){
             if(ReadProcessMemory(hDebugProcess,(void *)offset,&byteData,sizeof(BYTE),&stAccBytes)){
                 temporary[0]=byteData;