Major Refactoring v2.0

1 files changed, 42 insertions, 0 deletions

diff --git a/test/w3c/namespace/test153.scxml b/test/w3c/namespace/test153.scxml
new file mode 100644
index 0000000..0e980d7
--- /dev/null
+++ b/test/w3c/namespace/test153.scxml
@@ -0,0 +1,42 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- test that foreach goes over the array in the right order.  since the array contains 1 2 3, we compare the current 
+value with the previous value, which is stored in var1. The current value should always be larger.  If
+it ever isn't, set Var4 to 0, indicating failure -->
+<scxml:scxml xmlns="http://www.w3.org/2005/07/scxml" xmlns:conf="http://www.w3.org/2005/scxml-conformance" xmlns:scxml="http://www.w3.org/2005/07/scxml" initial="s0" version="1.0" datamodel="ecmascript">
+  <scxml:datamodel>
+    <scxml:data id="Var1" expr="0"/>
+    <!-- contains the previous value -->
+    <scxml:data id="Var2"/>
+    <!-- the item which will contain the current value -->
+    <scxml:data id="Var3">
+    [1,2,3]
+    </scxml:data>
+    <scxml:data id="Var4" expr="1"/>
+    <!-- 1 if success, 0 if failure -->
+  </scxml:datamodel>
+  <scxml:state id="s0">
+    <scxml:onentry>
+      <scxml:foreach item="Var2" array="Var3">
+        <scxml:if cond="Var1&lt;Var2">
+          <scxml:assign location="Var1" expr="Var2"/>
+          <scxml:else/>
+          <!-- values are out of order, record failure -->
+          <scxml:assign location="Var4" expr="0"/>
+        </scxml:if>
+      </scxml:foreach>
+    </scxml:onentry>
+    <!-- check that var1 has its original value  -->
+    <scxml:transition cond="Var4==0" target="fail"/>
+    <scxml:transition target="pass"/>
+  </scxml:state>
+  <scxml:final id="pass">
+    <scxml:onentry>
+      <scxml:log label="Outcome" expr="'pass'"/>
+    </scxml:onentry>
+  </scxml:final>
+  <scxml:final id="fail">
+    <scxml:onentry>
+      <scxml:log label="Outcome" expr="'fail'"/>
+    </scxml:onentry>
+  </scxml:final>
+</scxml:scxml>