Changeset 79 in dev for BasicCompiler32/Compile_Var.cpp

Timestamp:

Mar 25, 2007, 5:58:57 AM (17 years ago)

Author:

dai_9181

Message:

バージョンをβ17にした。
#strictをデフォルトの状態で適用するようにした（#90）。
Dimステートメントにおいて、初期値式とAsが同時に指定されていたとき、As以降も初期値式の一部として捉えるよう、変更（#91）。
GetTypeDef関数を完全廃止。

File:

• BasicCompiler32/Compile_Var.cpp (modified) (4 diffs)

BasicCompiler32/Compile_Var.cpp

@@ -1079 +1079 @@
 }
 
-void dim(bool isRef, char *VarName,int *SubScripts,Type &type,char *InitBuf,char *ConstractParameter,DWORD dwFlags){
+void dim( char *VarName,int *SubScripts,Type &type,char *InitBuf,char *ConstractParameter,DWORD dwFlags){
     if( UserProc::IsGlobalAreaCompiling() ){
         /////////////////////////
@@ -1085 +1085 @@
         /////////////////////////
 
-        AddGlobalVariable(isRef,VarName,SubScripts,type,InitBuf,ConstractParameter,dwFlags);
+        AddGlobalVariable(VarName,SubScripts,type,InitBuf,ConstractParameter,dwFlags);
     }
     else{
@@ -1092 +1092 @@
         /////////////////
 
-        if( UserProc::CompilingUserProc().localVars.BackSearch( VarName ) ){
+        if( UserProc::CompilingUserProc().localVars.DuplicateCheck( VarName ) ){
             //２重定義のエラー
             SetError(15,VarName,cp);
@@ -1100 +1100 @@
         bool isConst = ( dwFlags & DIMFLAG_CONST ) ? true:false;
 
-        Variable *pVar = new Variable( VarName, type, isConst, isRef );
+        Variable *pVar = new Variable( VarName, type, isConst );
 
         if( SubScripts[0] != -1 ){