diff options
Diffstat (limited to 'test/w3c/xpath/test153.scxml')
| -rw-r--r-- | test/w3c/xpath/test153.scxml | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/test/w3c/xpath/test153.scxml b/test/w3c/xpath/test153.scxml new file mode 100644 index 0000000..35b22bc --- /dev/null +++ b/test/w3c/xpath/test153.scxml @@ -0,0 +1,35 @@ +<?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 xmlns="http://www.w3.org/2005/07/scxml" xmlns:conf="http://www.w3.org/2005/scxml-conformance" initial="s0" version="1.0" datamodel="xpath"> +<datamodel> + <data id="Var1" expr="0"/> <!-- contains the previous value --> + <data id="Var2"/> <!-- the item which will contain the current value --> + <data id="Var3"> + <node xmlns="">1</node><node xmlns="">2</node><node xmlns="">3</node> + </data> + <data id="Var4" expr="1"/> <!-- 1 if success, 0 if failure --> + </datamodel> + + <state id="s0"> + <onentry> + <foreach item="Var2" array="$Var3/*"> + <if cond="$Var1/text() <$Var2/text() "> + <assign location="$Var1" expr="$Var2/text()"/> + <else/> + <!-- values are out of order, record failure --> + <assign location="$Var4" expr="0"/> + </if> + </foreach> + </onentry> + + <!-- check that var1 has its original value --> + <transition cond="$Var4/text() =0" target="fail"/> + <transition target="pass"/> + </state> + + <final id="pass"><onentry><log label="Outcome" expr="'pass'"/></onentry></final> + <final id="fail"><onentry><log label="Outcome" expr="'fail'"/></onentry></final> + + + +</scxml>
\ No newline at end of file |