Changeset 381 in dev for trunk/abdev/BasicCompiler32

Timestamp:

Dec 19, 2007, 3:31:03 AM (17 years ago)

Author:

dai_9181

Message:

Foreach文のパラメータをInで区切るようにした。

File:

• trunk/abdev/BasicCompiler32/Compile_Statement.cpp (modified) (4 diffs)

trunk/abdev/BasicCompiler32/Compile_Statement.cpp

@@ -596 +596 @@
 {
     Type resultType;
-    int i;
-    char temporary[VN_SIZE],collectionVar[VN_SIZE];
+    char temporary[VN_SIZE],variable[VN_SIZE],collectionVar[VN_SIZE];
     bool isError = false;
 
+    //レキシカルスコープをレベルアップ
+    compiler.codeGenerator.lexicalScopes.Start( compiler.codeGenerator.GetNativeCodeSize(), LexicalScope::SCOPE_TYPE_FOR );
+
     //第１パラメータを取得
-    char variable[VN_SIZE];
-    i=GetOneParameter(Parameter,0,variable);
+    int i = 0;
+    GetCustomToken( variable, Parameter, i, ESC_IN, true );
     if(!Parameter[i]){
         SetError(12,"Foreach",cp);
@@ -608 +610 @@
         goto ErrorStep;
     }
+    i++;
 
     //第２パラメータを取得（in～）
-    i=GetOneParameter(Parameter,i,collectionVar);
-
-    //レキシカルスコープをレベルアップ
-    compiler.codeGenerator.lexicalScopes.Start( compiler.codeGenerator.GetNativeCodeSize(), LexicalScope::SCOPE_TYPE_FOR );
+    lstrcpy( collectionVar, Parameter + i );
 
     if( !GetVarType( variable, resultType, false ) )
@@ -651 +651 @@
     const PertialSchedule *pTempPertialSchedule = compiler.codeGenerator.op_je( 0, sizeof(long), true );
 
-    // Currentプロパティから現在の値を取得
-    sprintf( temporary, "%s=%s.Current", variable, collectionVar );
-    Compile( temporary );
+    if( !isError )
+    {
+        // Currentプロパティから現在の値を取得
+        sprintf( temporary, "%s=%s.Current", variable, collectionVar );
+        Compile( temporary );
+    }
 
     //For内をコンパイル
@@ -666 +669 @@
     }
 
-    //jmp ...
-    compiler.codeGenerator.op_jmp_continue();
+    if( !isError )
+    {
+        //jmp ...
+        compiler.codeGenerator.op_jmp_continue();
+    }
 
     //レキシカルスコープをレベルダウン