done.event bug and prolog tests

Fixed the done.event bug and added first prolog transformed IRP tests

1 files changed, 43 insertions, 0 deletions

diff --git a/test/w3c/prolog/test338.scxml b/test/w3c/prolog/test338.scxml
new file mode 100644
index 0000000..3114c72
--- /dev/null
+++ b/test/w3c/prolog/test338.scxml
@@ -0,0 +1,43 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- test that invokeid is set correctly in events received from an invoked process.  timeout event catches the 
+case where the invoke doesn't work correctly -->
+<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"/>
+    <data id="var2"/>
+  </datamodel>
+  <state id="s0">
+    <onentry>
+      <send event="timeout" delay="2s"/>
+    </onentry>
+    <invoke idlocation="var1" type="http://www.w3.org/TR/scxml/">
+      <content>
+        <scxml initial="sub0" version="1.0" datamodel="prolog" name="machineName">
+          <final id="sub0">
+            <onentry>
+              <send target="#_parent" event="event1"/>
+            </onentry>
+          </final>
+        </scxml>
+      </content>
+    </invoke>
+    <transition event="event1" target="s1">
+      <assign location="var2" expr="_event.invokeid"/>
+    </transition>
+    <transition event="event0" target="fail"/>
+  </state>
+  <state id="s1">
+    <transition cond="var1===Var2" 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>