done.event bug and prolog tests

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

1 files changed, 69 insertions, 0 deletions

diff --git a/test/w3c/prolog/test234.scxml b/test/w3c/prolog/test234.scxml
new file mode 100644
index 0000000..6f11dab
--- /dev/null
+++ b/test/w3c/prolog/test234.scxml
@@ -0,0 +1,69 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- test that only finalize markup in the invoking state runs.  the first invoked process will
+return 2 in _event.data.aParam, while second invoked process sleeps without returning any events. 
+Only the first finalize should execute.  So when we get to s1 var1 should have value 2 but 
+var2 should still be set to 1  -->
+<scxml xmlns="http://www.w3.org/2005/07/scxml" xmlns:conf="http://www.w3.org/2005/scxml-conformance" initial="p0" version="1.0" datamodel="prolog">
+  <datamodel>
+    <data id="var1" expr="1"/>
+    <data id="var2" expr="1"/>
+  </datamodel>
+  <parallel id="p0">
+    <onentry>
+      <send event="timeout" delay="3s"/>
+    </onentry>
+    <transition event="timeout" target="fail"/>
+    <state id="p01">
+      <invoke type="http://www.w3.org/TR/scxml/">
+        <content>
+          <scxml version="1.0" initial="subFinal1" datamodel="prolog">
+            <final id="subFinal1">
+              <onentry>
+                <send target="#_parent" event="childToParent">
+                  <param name="aParam" expr="2"/>
+                </send>
+              </onentry>
+            </final>
+          </scxml>
+        </content>
+        <finalize>
+          <assign location="var1" expr="_event.data.aParam"/>
+        </finalize>
+      </invoke>
+      <transition event="childToParent" cond="X = 2, var1(X)" target="s1"/>
+      <transition event="childToParent" target="fail"/>
+    </state>
+    <state id="p02">
+      <invoke type="http://www.w3.org/TR/scxml/">
+        <content>
+          <scxml version="1.0" initial="sub0" datamodel="prolog">
+            <state id="sub0">
+              <onentry>
+                <send event="timeout" delay="2s"/>
+              </onentry>
+              <transition event="timeout" target="subFinal2"/>
+            </state>
+            <final id="subFinal2"/>
+          </scxml>
+        </content>
+        <finalize>
+          <assign location="var2" expr="_event.data.aParam"/>
+        </finalize>
+      </invoke>
+    </state>
+  </parallel>
+  <state id="s1">
+    <transition cond="X = 1, var2(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>