From: Jerome St-Louis <jerome@ecere.com>
Date: Fri, 19 Sep 2014 22:20:02 +0000 (-0400)
Subject: compiler/libec/dbpass: Processing EDA/DB keywords within for each statements
X-Git-Tag: 0.44.11~32
X-Git-Url: https://ecere.com/cgi-bin/gitweb.cgi?p=sdk;a=commitdiff_plain;h=94a6f3b26f572c7bb547c8d798035ad64b7ee72b

compiler/libec/dbpass: Processing EDA/DB keywords within for each statements
---

diff --git a/compiler/libec/src/dbpass.ec b/compiler/libec/src/dbpass.ec
index b38b9a8..d6e89bf 100644
--- a/compiler/libec/src/dbpass.ec
+++ b/compiler/libec/src/dbpass.ec
@@ -454,6 +454,20 @@ static void ProcessStatement(Statement stmt)
             ProcessStatement(stmt.forStmt.stmt);
          break;
       }
+      case forEachStmt:
+      {
+         Expression exp;
+
+         for(exp = stmt.forEachStmt.exp ? stmt.forEachStmt.exp->first : null; exp; exp = exp.next)
+            ProcessExpression(exp);
+
+         for(exp = stmt.forEachStmt.filter ? stmt.forEachStmt.filter->first : null; exp; exp = exp.next)
+            ProcessExpression(exp);
+
+         if(stmt.forEachStmt.stmt)
+            ProcessStatement(stmt.forEachStmt.stmt);
+         break;
+      }
       case gotoStmt:
          break;
       case continueStmt: