1 files changed, 54 insertions, 0 deletions
diff --git a/test/w3c/promela/test329.scxml b/test/w3c/promela/test329.scxml
new file mode 100644
index 0000000..6f6dd64
--- /dev/null
+++ b/test/w3c/promela/test329.scxml
@@ -0,0 +1,54 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- test that none of the system variables can be modified -->
+<scxml xmlns="http://www.w3.org/2005/07/scxml" xmlns:conf="http://www.w3.org/2005/scxml-conformance" initial="s0" version="1.0" datamodel="promela" name="machineName">
+  <datamodel>
+    <data id="Var1" type="int"/>
+    <data id="Var2" type="int"/>
+    <data id="Var3" type="int"/>
+    <data id="Var4" type="int"/>
+  </datamodel>
+  <state id="s0">
+    <onentry>
+      <!-- get _event bound so we can use it in s1-->
+      <raise event="foo"/>
+      <assign location="Var1" expr="_sessionid"/>
+      <assign location="_sessionid" expr="27"/>
+    </onentry>
+    <transition event="foo" cond="Var1==_sessionid" target="s1"/>
+    <transition event="*" target="fail"/>
+  </state>
+  <state id="s1">
+    <onentry>
+      <assign location="Var2" expr="_event"/>
+      <assign location="_event" expr="27"/>
+    </onentry>
+    <transition cond="Var2==_event" target="s2"/>
+    <transition target="fail"/>
+  </state>
+  <state id="s2">
+    <onentry>
+      <assign location="Var3" expr="_name"/>
+      <assign location="_name" expr="27"/>
+    </onentry>
+    <transition cond="Var3==_name" target="s3"/>
+    <transition target="fail"/>
+  </state>
+  <state id="s3">
+    <onentry>
+      <assign location="Var4" expr="_ioprocessors"/>
+      <assign location="_ioprocessors" expr="27"/>
+    </onentry>
+    <transition cond="Var4==_ioprocessors" target="pass"/>
+    <transition target="fail"/>
+  </state>
+  <final xmlns:scxml="http://www.w3.org/2005/07/scxml" id="pass">
+    <onentry>
+      <log label="Outcome" expr="'pass'"/>
+    </onentry>
+  </final>
+  <final xmlns:scxml="http://www.w3.org/2005/07/scxml" id="fail">
+    <onentry>
+      <log label="Outcome" expr="'fail'"/>
+    </onentry>
+  </final>
+</scxml>