1 files changed, 52 insertions, 0 deletions
diff --git a/test/w3c/prolog/test354.scxml b/test/w3c/prolog/test354.scxml
new file mode 100644
index 0000000..aa30cbf
--- /dev/null
+++ b/test/w3c/prolog/test354.scxml
@@ -0,0 +1,52 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- test that event.data can be populated using both namelist, param and <content>
+and that correct values are used -->
+<scxml xmlns="http://www.w3.org/2005/07/scxml" xmlns:conf="http://www.w3.org/2005/scxml-conformance" initial="s0" version="1.0" datamodel="prolog">
+  <datamodel>
+    <data id="var1" expr="1"/>
+    <data id="var2"/>
+    <data id="var3"/>
+  </datamodel>
+  <state id="s0">
+    <onentry>
+      <send delay="5s" event="timeout"/>
+      <send event="event1" type="http://www.w3.org/TR/scxml/#SCXMLEventProcessor" namelist="var1">
+        <param name="param1" expr="2"/>
+      </send>
+    </onentry>
+    <transition event="event1" target="s1">
+      <assign location="var2" expr="_event.data.Var1"/>
+      <assign location="var3" expr="_event.data.param1"/>
+    </transition>
+    <transition event="*" target="fail">
+    </transition>
+  </state>
+  <state id="s1">
+    <transition cond="X = 1, var2(X)" target="s2"/>
+    <transition target="fail"/>
+  </state>
+  <state id="s2">
+    <transition cond="X = 2, var3(X)" target="s3"/>
+    <transition target="fail"/>
+  </state>
+  <state id="s3">
+    <onentry>
+      <send delay="5s" event="timeout"/>
+      <send event="event2">
+        <content>123</content>
+      </send>
+    </onentry>
+    <transition event="event2" cond="_event.data == 123" target="pass"/>
+    <transition event="*" 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>