blob: 67d463f3f967b5143471a87ad4604b0ab759b856 (
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
36
37
38
39
40
41
42
43
|
<?xml version="1.0" encoding="UTF-8"?>
<!-- test that a targetless transition does not exit and reenter its source state -->
<scxml xmlns="http://www.w3.org/2005/07/scxml" xmlns:conf="http://www.w3.org/2005/scxml-conformance" initial="s1" version="1.0" datamodel="prolog">
<datamodel>
<data id="var1" expr="0"/>
<!-- how often we have exited s2 -->
<data id="var2" expr="0"/>
<!-- how often the targetless transition in s2 has been executed -->
</datamodel>
<state id="s1">
<onentry>
<raise event="foo"/>
<raise event="bar"/>
</onentry>
<transition target="s2"/>
</state>
<state id="s2">
<onexit>
<assign location="var1(Y)" expr="var1(X), Y is X + 1, retractall(var1(_))"/>
</onexit>
<transition event="foo">
<assign location="var2(Y)" expr="var2(X), Y is X + 1, retractall(var1(_))"/>
</transition>
<!-- make sure the transition on foo was actually taken -->
<transition event="bar" cond="X = 1, var2(X)" target="s3"/>
<transition event="bar" target="fail"/>
</state>
<state id="s3">
<!-- make sure that s2 was exited only once -->
<transition cond="X = 1, var1(X)" target="pass"/>
<transition target="fail"/>
</state>
<final id="pass">
<onentry>
<log label="Outcome" expr="'pass'"/>
</onentry>
</final>
<final id="fail">
<onentry>
<log label="Outcome" expr="'fail'"/>
</onentry>
</final>
</scxml>
|
