1 files changed, 33 insertions, 0 deletions
diff --git a/test/w3c/prolog/test349.scxml b/test/w3c/prolog/test349.scxml
new file mode 100644
index 0000000..88a01d3
--- /dev/null
+++ b/test/w3c/prolog/test349.scxml
@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- test that value in origin field can be used to send an event back to the sender -->
+<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"/>
+  </datamodel>
+  <state id="s0">
+    <onentry>
+      <send type="http://www.w3.org/TR/scxml/#SCXMLEventProcessor" event="s0Event"/>
+    </onentry>
+    <transition event="s0Event" target="s2">
+      <assign location="var1" expr="_event.origin"/>
+    </transition>
+    <transition event="*" target="fail"/>
+  </state>
+  <state id="s2">
+    <onentry>
+      <send type="http://www.w3.org/TR/scxml/#SCXMLEventProcessor" targetexpr="var1" event="s0Event2"/>
+    </onentry>
+    <transition event="s0Event2" 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>