summaryrefslogtreecommitdiffstats
path: root/test/w3c/lua/test150.scxml
blob: ea3ef06829412d91f360988f9913ed41ff846500 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
<?xml version="1.0" standalone="no"?>
<!-- test that foreach causes a new variable to be declared if 'item' doesn't already exist.  Also
test that it will use an existing var if it does exist. -->
<scxml xmlns="http://www.w3.org/2005/07/scxml" initial="s0" version="1.0" datamodel="lua">
  <datamodel>
    <data id="testvar1"/>
    <data id="testvar2"/>
    <data id="testvar3">{1,2,3}</data>
  </datamodel>
  <state id="s0">
    <onentry>
      <!-- first use declared variables -->
      <foreach array="testvar3" index="testvar2" item="testvar1"/>
      <raise event="foo"/>
    </onentry>
    <transition event="error" target="fail"/>
    <transition event="*" target="s1"/>
  </state>
  <state id="s1">
    <onentry>
      <!-- now use undeclared variables -->
      <foreach array="testvar3" index="testvar5" item="testvar4"/>
      <raise event="bar"/>
    </onentry>
    <transition event="error" target="fail"/>
    <transition event="*" target="s2"/>
  </state>
  <state id="s2">
    <!-- check that var4 is bound -->
    <transition cond="testvar4 ~= nil" target="pass"/>
    <transition target="fail"/>
  </state>
  <final id="pass"/>
  <final id="fail"/>
</scxml>