Changeset 79 in dev for BasicCompiler_Common/Intermediate_Step1.cpp

Timestamp:

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

Author:

dai_9181

Message:

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

File:

• BasicCompiler_Common/Intermediate_Step1.cpp (modified) (2 diffs)

BasicCompiler_Common/Intermediate_Step1.cpp

@@ -328 +328 @@
 
     extern BOOL bStrict;
-    bStrict=0;
+    bStrict=1;
 
     for(i=0;;i++){
@@ -351 +351 @@
             else if(lstrcmpi(temporary,"strict")==0){
                 //#strict
+                //旧機能なので、無視
                 for(;;i2++){
                     if(basbuf[i2]=='\n'||basbuf[i2]=='\0') break;
                 }
                 SlideString(basbuf+i2,i-i2);
-
-                //型チェックを厳密に行う
-                bStrict=1;
             }
             else if(lstrcmpi(temporary,"struct")==0){