Changeset 69 in dev for BasicCompiler64

Timestamp:

Mar 13, 2007, 4:52:59 AM (18 years ago)

Author:

dai_9181

Message:

一時文字列をNewしたときに、bUseHeapフラグを立たせないようにした（bUseHeapが立つのは一時構造体のときのみ）。
DEF_PTR_CHARを廃止し、typeOfPtrCharを導入。

Location:

BasicCompiler64

Files:

• Compile_Var.cpp (modified) (2 diffs)
• NumOpe.cpp (modified) (3 diffs)
• varlist.cpp (modified) (1 diff)

BasicCompiler64/Compile_Var.cpp

@@ -899 +899 @@
             *(float *)(initGlobalBuf+offset)=(float)dbl;
     else if(type==DEF_INT64||type==DEF_QWORD||IsPtrType(type)){
-        if(type==DEF_PTR_CHAR&&lpCalcIndex==LITERAL_STRING){
+        if(type==typeOfPtrChar&&lpCalcIndex==LITERAL_STRING){
             //文字列定数のとき
 
@@ -1048 +1048 @@
     }
     else if(type==DEF_INT64||type==DEF_QWORD||IsPtrType(type)){
-        if(type==DEF_PTR_CHAR&&lpCalcIndex==LITERAL_STRING){
+        if(type==typeOfPtrChar&&lpCalcIndex==LITERAL_STRING){
             //文字列定数のとき
 

BasicCompiler64/NumOpe.cpp

@@ -14 +14 @@
     //////////////////////////////////////////////////////
 
-        char *parameter = (char *)malloc( lstrlen( lpszText ) + 3 );
-        lstrcpy( parameter, lpszText );
+        char *parameter = (char *)malloc( lstrlen( lpszText ) + 32 );
+        sprintf( parameter, "\"%s\"%c%c*Char", lpszText, 1, ESC_AS );
         SetStringQuotes( parameter );
 
@@ -222 +222 @@
                             type[sp]=DEF_OBJECT;
                             index_stack[sp]=(LONG_PTR)pobj_StringClass;
-                            bUseHeap[sp]=1;
                             bLiteralCalculation=0;
 
@@ -233 +232 @@
                     }
 
-                    type[sp]=DEF_PTR_CHAR;
+                    type[sp]=typeOfPtrChar;
                     bLiteralCalculation=0;
 

BasicCompiler64/varlist.cpp

@@ -49 +49 @@
     }
     else{
-        if(type==DEF_PTR_CHAR||type==MAKE_PTR_TYPE(DEF_BYTE,1)){
+        if(type==MAKE_PTR_TYPE(DEF_SBYTE,1)||type==MAKE_PTR_TYPE(DEF_BYTE,1)){
             if(ReadProcessMemory(hDebugProcess,(void *)offset,&pData,sizeof(void *),&stAccBytes)){
                 for(i2=0;;i2++){