cpee 1.3.102

data/cockpit/testsets/Mangler 1.xml

@@ -0,0 +1,352 @@
+<?xml version="1.0"?>
+<testset>
+  <positions/>
+  <handlerwrapper>DefaultHandlerWrapper</handlerwrapper>
+  <dataelements>
+    <x>_begin</x>
+    <nasty>What a nasty bug</nasty>
+  </dataelements>
+  <endpoints>
+    <timeout>http://gruppe.wst.univie.ac.at/~mangler/services/timeout.php</timeout>
+  </endpoints>  
+  <description xmlns="http://cpee.org/ns/description/1.0">
+    <call id="a1" endpoint="timeout">
+      <parameters><!--{{{-->
+        <method>post</method>
+        <parameters>
+          <timeout>4</timeout>
+          <bug>data.nasty</bug>
+        </parameters>
+      </parameters><!--}}}-->
+      <manipulate output="result">  data.x += "done"</manipulate>  
+    </call>  
+    <parallel wait="2">
+      <parallel_branch>
+        <call id="a2_1" endpoint="timeout">
+            <parameters><!--{{{-->
+            <method>post</method>
+            <parameters>
+              <timeout>6</timeout>
+            </parameters>
+          </parameters><!--}}}-->
+        </call>  
+      </parallel_branch>
+      <parallel_branch>
+        <call id="a2_2" endpoint="timeout">
+          <parameters><!--{{{-->
+            <method>post</method>
+            <parameters>
+              <timeout>2</timeout>
+            </parameters>
+          </parameters><!--}}}-->
+        </call>  
+      </parallel_branch>
+    </parallel>  
+    <manipulate id="a3">  data.x += '_end'</manipulate>  
+    <choose>
+      <alternative condition="data.x != nil">
+        <call id="a4_1" endpoint="timeout">
+          <parameters><!--{{{-->
+            <method>post</method>
+            <parameters>
+              <timeout>4</timeout>
+            </parameters>
+          </parameters><!--}}}-->
+        </call>  
+      </alternative>
+      <otherwise>
+        <call id="a4_2" endpoint="timeout">
+          <parameters><!--{{{-->
+            <method>post</method>
+            <parameters>
+              <timeout>10</timeout>
+            </parameters>
+          </parameters><!--}}}-->
+        </call>  
+      </otherwise>
+    </choose>
+  </description>
+  <transformation>
+    <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:d="http://cpee.org/ns/description/1.0">
+      <xsl:output method="text"/>
+      <xsl:strip-space elements="*"/>
+      <xsl:variable name="myspacemultiplier">2</xsl:variable>
+
+      <xsl:template match="/">
+        <xsl:apply-templates select="//d:description"/>
+      </xsl:template>
+
+      <xsl:template match="//d:description">
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="-1*$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>  
+      </xsl:template>
+
+      <xsl:template match="*">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:if test="name()='call' or name()='manipulate'">
+          <xsl:text>activity :</xsl:text>
+          <xsl:value-of select="@id"/>
+        </xsl:if>
+        <xsl:if test="name()='call'">
+          <xsl:text>, :call, :</xsl:text>
+          <xsl:value-of select="@endpoint"/>
+          <xsl:apply-templates select="d:parameters"/>
+          <xsl:apply-templates select="d:manipulate" mode="part-of-call">
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='manipulate'">
+          <xsl:text>, :manipulate</xsl:text>
+          <xsl:call-template name="print-content">
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='parallel'">
+          <xsl:text>parallel</xsl:text>
+          <xsl:if test="@wait">
+            <xsl:text> :wait => </xsl:text>
+            <xsl:value-of select="@wait"/>
+          </xsl:if>
+          <xsl:text> do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='loop'">
+          <xsl:text>loop </xsl:text>
+          <xsl:if test="@pre_test">
+            <xsl:text>pre_test{</xsl:text>
+            <xsl:value-of select="@pre_test"/>
+            <xsl:text>} </xsl:text>
+          </xsl:if>
+          <xsl:if test="@post_test">
+            <xsl:text>post_test{</xsl:text>
+            <xsl:value-of select="@post_test"/>
+            <xsl:text>} </xsl:text>
+          </xsl:if>
+          <xsl:text>do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='choose'">
+          <xsl:text>choose do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='group'">
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='critical'">
+          <xsl:text>critical :</xsl:text>
+          <xsl:value-of select="@sid"/>
+          <xsl:text> do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+      </xsl:template>
+      
+      <xsl:template match="d:alternative">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>alternative </xsl:text>
+        <xsl:value-of select="@condition"/>
+        <xsl:text> do</xsl:text>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:otherwise">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>otherwise do</xsl:text>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:parallel_branch">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>parallel_branch</xsl:text>
+        <xsl:if test="@pass">
+          <xsl:text> </xsl:text>
+          <xsl:value-of select="@pass"/>
+        </xsl:if>
+        <xsl:text> do</xsl:text>
+        <xsl:if test="@local">
+          <xsl:text> |</xsl:text>
+          <xsl:value-of select="@local"/>
+          <xsl:text>|</xsl:text>
+        </xsl:if>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:parameters">
+        <xsl:apply-templates select="d:*" mode="parameter"/>
+      </xsl:template>
+        
+      <xsl:template match="d:*" mode="parameter">
+        <xsl:text>, :</xsl:text>
+        <xsl:value-of select="name()"/>
+        <xsl:text> => </xsl:text>
+        <xsl:choose>  
+          <xsl:when test="count(*) > 0">
+            <xsl:text>[</xsl:text>
+            <xsl:apply-templates select="d:*" mode="sub-parameter"/>
+            <xsl:text>]</xsl:text>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:choose>
+              <xsl:when test="@type = 'symbolic'">
+                <xsl:value-of select="text()"/>
+              </xsl:when>
+              <xsl:otherwise>
+                <xsl:text>"</xsl:text>
+                <xsl:value-of select="text()"/>
+                <xsl:text>"</xsl:text>
+              </xsl:otherwise>
+            </xsl:choose>  
+          </xsl:otherwise>
+        </xsl:choose>  
+      </xsl:template>
+      
+      <xsl:template match="d:*" mode="sub-parameter">
+        <xsl:text> { :</xsl:text>
+        <xsl:value-of select="name()"/>
+        <xsl:text> => </xsl:text>
+        <xsl:value-of select="text()"/>
+        <xsl:text> }</xsl:text>
+        <xsl:choose>  
+          <xsl:when test="generate-id(.) = generate-id(../*[last()])">
+            <xsl:text> </xsl:text>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:text>,</xsl:text>
+          </xsl:otherwise>
+        </xsl:choose>  
+      </xsl:template>
+
+      <xsl:template match="d:manipulate" mode="part-of-call">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-content">
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+        </xsl:call-template>
+      </xsl:template>
+
+      <xsl:template name="print-content">
+        <xsl:param name="myspace"/>
+        <xsl:if test="text()">
+          <xsl:text> do </xsl:text>
+          <xsl:if test="@output">
+            <xsl:text>|</xsl:text>
+            <xsl:value-of select="@output"/>
+            <xsl:text>|</xsl:text>
+          </xsl:if>
+          <xsl:call-template name="print-newline"/>
+          <xsl:value-of select="text()"/>
+          <xsl:call-template name="print-newline"/>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+        </xsl:if>
+      </xsl:template>
+
+      <xsl:template name="print-space">
+        <xsl:param name="i"/>
+        <xsl:param name="count"/>
+        <xsl:if test="$i &lt;= $count">
+          <xsl:text> </xsl:text>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">
+              <xsl:value-of select="$i + 1"/>
+            </xsl:with-param>
+            <xsl:with-param name="count">
+              <xsl:value-of select="$count"/>
+            </xsl:with-param>
+          </xsl:call-template>
+        </xsl:if>
+      </xsl:template>
+      <xsl:template name="print-newline">
+        <xsl:text>
+</xsl:text>
+      </xsl:template>
+
+    </xsl:stylesheet>
+  </transformation>
+</testset>

data/cockpit/testsets/Mangler 2.xml

@@ -0,0 +1,372 @@
+<?xml version="1.0"?>
+<testset>
+  <positions/>
+  <handlerwrapper>DefaultHandlerWrapper</handlerwrapper>
+  <dataelements>
+    <persons>3</persons>
+    <card>Visa_12345</card>
+    <airline>null</airline>
+    <hotels>[]</hotels>
+    <from>Vienna</from>
+    <to>Prague</to>
+    <costs>0</costs>
+  </dataelements>
+  <endpoints>
+    <bookAir>http://gruppe.wst.univie.ac.at/~mangler/services/airline.php</bookAir>
+    <bookHotel>http://gruppe.wst.univie.ac.at/~mangler/services/hotel.php</bookHotel>
+    <approve>http://gruppe.wst.univie.ac.at/~mangler/services/approval.php</approve>
+  </endpoints>
+  <description xmlns="http://cpee.org/ns/description/1.0">
+    <call id="a1" endpoint="bookAir">
+      <parameters>
+        <method>post</method>
+        <parameters>
+          <from>data.from</from>
+          <to>data.to</to>
+          <persons>data.persons</persons>
+        </parameters>
+      </parameters>
+      <manipulate output="result">  data.airline = result.value('id')
+  data.costs += result.value('costs').to_f</manipulate>
+    </call>
+    <parallel>
+      <loop pre_test="data.persons > 0">
+        <parallel_branch pass="data.persons" local="p">
+          <call id="a2" endpoint="bookHotel">
+            <parameters>
+              <method>post</method>
+              <parameters>
+                <to>data.to</to>
+              </parameters>
+            </parameters>
+            <manipulate output="result">        data.hotels &lt;&lt; result.value('id')
+        data.costs += result.value('costs').to_f</manipulate>
+          </call>
+        </parallel_branch>
+        <manipulate id="a3">      data.persons -= 1</manipulate>  
+      </loop>  
+      <loop pre_test="data.persons > 0">
+        <parallel_branch pass="data.persons" local="p">
+          <call id="a4" endpoint="bookHotel">
+            <parameters>
+              <method>post</method>
+              <parameters>
+                <to>data.to</to>
+              </parameters>
+            </parameters>
+            <manipulate output="result">        data.hotels &lt;&lt; result.value('id')
+        data.costs += result.value('costs').to_f</manipulate>
+          </call>
+        </parallel_branch>
+        <parallel_branch pass="data.persons" local="p">
+          <call id="a5" endpoint="bookHotel">
+            <parameters>
+              <method>post</method>
+              <parameters>
+                <to>data.to</to>
+              </parameters>
+            </parameters>
+            <manipulate output="result">        data.hotels &lt;&lt; result.value('id')
+        data.costs += result.value('costs').to_f</manipulate>
+          </call>
+        </parallel_branch>
+        <manipulate id="a6">      data.persons -= 1</manipulate>  
+      </loop>  
+    </parallel>  
+    <choose>
+      <alternative condition="data.costs > 700">
+        <call id="a7" endpoint="approve">
+          <parameters>
+            <method>post</method>
+            <parameters>
+              <costs>data.costs</costs>
+            </parameters>
+          </parameters>
+        </call>  
+      </alternative>
+    </choose>
+  </description>
+  <transformation>
+    <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:d="http://cpee.org/ns/description/1.0">
+      <xsl:output method="text"/>
+      <xsl:strip-space elements="*"/>
+      <xsl:variable name="myspacemultiplier">2</xsl:variable>
+
+      <xsl:template match="/">
+        <xsl:apply-templates select="//d:description"/>
+      </xsl:template>
+
+      <xsl:template match="//d:description">
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="-1*$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>  
+      </xsl:template>
+
+      <xsl:template match="*">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:if test="name()='call' or name()='manipulate'">
+          <xsl:text>activity :</xsl:text>
+          <xsl:value-of select="@id"/>
+        </xsl:if>
+        <xsl:if test="name()='call'">
+          <xsl:text>, :call, :</xsl:text>
+          <xsl:value-of select="@endpoint"/>
+          <xsl:apply-templates select="d:parameters"/>
+          <xsl:apply-templates select="d:manipulate" mode="part-of-call">
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='manipulate'">
+          <xsl:text>, :manipulate</xsl:text>
+          <xsl:call-template name="print-content">
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='parallel'">
+          <xsl:text>parallel</xsl:text>
+          <xsl:if test="@wait">
+            <xsl:text> :wait => </xsl:text>
+            <xsl:value-of select="@wait"/>
+          </xsl:if>
+          <xsl:text> do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='loop'">
+          <xsl:text>loop </xsl:text>
+          <xsl:if test="@pre_test">
+            <xsl:text>pre_test{</xsl:text>
+            <xsl:value-of select="@pre_test"/>
+            <xsl:text>} </xsl:text>
+          </xsl:if>
+          <xsl:if test="@post_test">
+            <xsl:text>post_test{</xsl:text>
+            <xsl:value-of select="@post_test"/>
+            <xsl:text>} </xsl:text>
+          </xsl:if>
+          <xsl:text>do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='choose'">
+          <xsl:text>choose do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='group'">
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='critical'">
+          <xsl:text>critical :</xsl:text>
+          <xsl:value-of select="@sid"/>
+          <xsl:text> do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+      </xsl:template>
+      
+      <xsl:template match="d:alternative">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>alternative </xsl:text>
+        <xsl:value-of select="@condition"/>
+        <xsl:text> do</xsl:text>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:otherwise">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>otherwise do</xsl:text>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:parallel_branch">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>parallel_branch</xsl:text>
+        <xsl:if test="@pass">
+          <xsl:text> </xsl:text>
+          <xsl:value-of select="@pass"/>
+        </xsl:if>
+        <xsl:text> do</xsl:text>
+        <xsl:if test="@local">
+          <xsl:text> |</xsl:text>
+          <xsl:value-of select="@local"/>
+          <xsl:text>|</xsl:text>
+        </xsl:if>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:parameters">
+        <xsl:apply-templates select="d:*" mode="parameter"/>
+      </xsl:template>
+        
+      <xsl:template match="d:*" mode="parameter">
+        <xsl:text>, :</xsl:text>
+        <xsl:value-of select="name()"/>
+        <xsl:text> => </xsl:text>
+        <xsl:choose>  
+          <xsl:when test="count(*) > 0">
+            <xsl:text>[</xsl:text>
+            <xsl:apply-templates select="d:*" mode="sub-parameter"/>
+            <xsl:text>]</xsl:text>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:choose>
+              <xsl:when test="@type = 'symbolic'">
+                <xsl:value-of select="text()"/>
+              </xsl:when>
+              <xsl:otherwise>
+                <xsl:text>"</xsl:text>
+                <xsl:value-of select="text()"/>
+                <xsl:text>"</xsl:text>
+              </xsl:otherwise>
+            </xsl:choose>  
+          </xsl:otherwise>
+        </xsl:choose>  
+      </xsl:template>
+      
+      <xsl:template match="d:*" mode="sub-parameter">
+        <xsl:text> { :</xsl:text>
+        <xsl:value-of select="name()"/>
+        <xsl:text> => </xsl:text>
+        <xsl:value-of select="text()"/>
+        <xsl:text> }</xsl:text>
+        <xsl:choose>  
+          <xsl:when test="generate-id(.) = generate-id(../*[last()])">
+            <xsl:text> </xsl:text>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:text>,</xsl:text>
+          </xsl:otherwise>
+        </xsl:choose>  
+      </xsl:template>
+
+      <xsl:template match="d:manipulate" mode="part-of-call">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-content">
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+        </xsl:call-template>
+      </xsl:template>
+
+      <xsl:template name="print-content">
+        <xsl:param name="myspace"/>
+        <xsl:if test="text()">
+          <xsl:text> do </xsl:text>
+          <xsl:if test="@output">
+            <xsl:text>|</xsl:text>
+            <xsl:value-of select="@output"/>
+            <xsl:text>|</xsl:text>
+          </xsl:if>
+          <xsl:call-template name="print-newline"/>
+          <xsl:value-of select="text()"/>
+          <xsl:call-template name="print-newline"/>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+        </xsl:if>
+      </xsl:template>
+
+      <xsl:template name="print-space">
+        <xsl:param name="i"/>
+        <xsl:param name="count"/>
+        <xsl:if test="$i &lt;= $count">
+          <xsl:text> </xsl:text>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">
+              <xsl:value-of select="$i + 1"/>
+            </xsl:with-param>
+            <xsl:with-param name="count">
+              <xsl:value-of select="$count"/>
+            </xsl:with-param>
+          </xsl:call-template>
+        </xsl:if>
+      </xsl:template>
+      <xsl:template name="print-newline">
+        <xsl:text>
+</xsl:text>
+      </xsl:template>
+
+    </xsl:stylesheet>
+  </transformation>
+</testset>