Changeset 138 in dev for BasicCompiler64

Timestamp:

Jun 12, 2007, 1:57:26 AM (18 years ago)

Author:

dai_9181

Message:

Member::initializeExpressionのリファクタリング

Location:

BasicCompiler64

Files:

• Compile_Var.cpp (modified) (3 diffs)
• Opcode.h (modified) (1 diff)

BasicCompiler64/Compile_Var.cpp

@@ -736 +736 @@
 }
 
-bool SetInitGlobalData(int offset,const Type &type,const int *SubScripts,char *InitBuf){
+bool SetInitGlobalData(int offset,const Type &type,const int *SubScripts,const char *lpszInitBuf){
     extern BYTE *initGlobalBuf;
     int i,i2,i3;
     char temporary[VN_SIZE];
+    char InitBuf[VN_SIZE];
+    lstrcpy( InitBuf, lpszInitBuf );
 
     if(InitBuf[0]=='['){
@@ -873 +875 @@
     return true;
 }
-bool InitLocalVar(int offset,const Type &type,const int *SubScripts,char *InitBuf){
+bool InitLocalVar(int offset,const Type &type,const int *SubScripts,const char *lpszInitBuf){
     int i,i2,i3;
     char temporary[VN_SIZE];
+    char InitBuf[VN_SIZE];
+    lstrcpy( InitBuf, lpszInitBuf );
 
     if(InitBuf[0]=='['){
@@ -1047 +1051 @@
 }
 
-void dim( char *VarName,int *SubScripts,Type &type,char *InitBuf,char *ConstractParameter,DWORD dwFlags){
+void dim( char *VarName,int *SubScripts,Type &type,const char *InitBuf,const char *ConstractParameter,DWORD dwFlags){
     if( UserProc::IsGlobalAreaCompiling() ){
         /////////////////////////

BasicCompiler64/Opcode.h

@@ -324 +324 @@
 void SetThisPtrToReg(int reg);
 bool GetVarOffset(bool isErrorEnabled,bool isWriteAccess,const char *NameBuffer,RELATIVE_VAR *pRelativeVar,Type &resultType,int *pss = NULL);
-bool SetInitGlobalData(int offset,const Type &type,const int *SubScripts,char *InitBuf);
+bool SetInitGlobalData(int offset,const Type &type,const int *SubScripts,const char *InitBuf);
 #define DIMFLAG_INITDEBUGVAR            0x01
 #define DIMFLAG_NONCALL_CONSTRACTOR     0x02
 #define DIMFLAG_STATIC                  0x04
 #define DIMFLAG_CONST                   0x08
-void dim( char *VarName,int *SubScripts,Type &type,char *InitBuf,char *ConstractParameter,DWORD dwFlags);
+void dim( char *VarName,int *SubScripts,Type &type, const char *InitBuf,const char *ConstractParameter,DWORD dwFlags);
 void SetVarPtrToReg(int reg,RELATIVE_VAR *pRelativeVar);
 bool Compile_AddGlobalRootsForGc();