Blame xsl/classsynopsis.xsl

Packit Service 76cb02
Packit Service 76cb02
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version='1.0'>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
    XSLT Stylesheet DocBook -> LaTeX 
Packit Service 76cb02
    ############################################################################ -->
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
                     |fieldsynopsis
Packit Service 76cb02
                     |methodsynopsis
Packit Service 76cb02
                     |constructorsynopsis
Packit Service 76cb02
                     |destructorsynopsis">
Packit Service 76cb02
  <xsl:call-template name="output.verbatim">
Packit Service 76cb02
    <xsl:with-param name="content">
Packit Service 76cb02
      <xsl:apply-templates select="." mode="content"/>
Packit Service 76cb02
    </xsl:with-param>
Packit Service 76cb02
  </xsl:call-template>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
                     |fieldsynopsis
Packit Service 76cb02
                     |methodsynopsis
Packit Service 76cb02
                     |constructorsynopsis
Packit Service 76cb02
                     |destructorsynopsis" mode="save.verbatim">
Packit Service 76cb02
  <xsl:call-template name="save.verbatim">
Packit Service 76cb02
    <xsl:with-param name="content">
Packit Service 76cb02
      <xsl:apply-templates select="." mode="content"/>
Packit Service 76cb02
    </xsl:with-param>
Packit Service 76cb02
  </xsl:call-template>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
                     |fieldsynopsis
Packit Service 76cb02
                     |methodsynopsis
Packit Service 76cb02
                     |constructorsynopsis
Packit Service 76cb02
                     |destructorsynopsis" mode="content">
Packit Service 76cb02
  <xsl:param name="language">
Packit Service 76cb02
    <xsl:choose>
Packit Service 76cb02
    <xsl:when test="@language">
Packit Service 76cb02
      <xsl:value-of select="@language"/>
Packit Service 76cb02
    </xsl:when>
Packit Service 76cb02
    <xsl:otherwise>
Packit Service 76cb02
      <xsl:value-of select="$classsynopsis.default.language"/>
Packit Service 76cb02
    </xsl:otherwise>
Packit Service 76cb02
    </xsl:choose>
Packit Service 76cb02
  </xsl:param>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:choose>
Packit Service 76cb02
    <xsl:when test="$language='java'">
Packit Service 76cb02
      <xsl:apply-templates select="." mode="java"/></xsl:when>
Packit Service 76cb02
    <xsl:when test="$language='perl'">
Packit Service 76cb02
      <xsl:apply-templates select="." mode="perl"/></xsl:when>
Packit Service 76cb02
    <xsl:when test="$language='idl'">
Packit Service 76cb02
      <xsl:apply-templates select="." mode="idl"/></xsl:when>
Packit Service 76cb02
    <xsl:when test="$language='cpp'">
Packit Service 76cb02
      <xsl:apply-templates select="." mode="cpp"/></xsl:when>
Packit Service 76cb02
    <xsl:otherwise>
Packit Service 76cb02
      <xsl:message>
Packit Service 76cb02
        <xsl:text>Unrecognized language on classsynopsis: </xsl:text>
Packit Service 76cb02
        <xsl:value-of select="$language"/>
Packit Service 76cb02
      </xsl:message>
Packit Service 76cb02
      <xsl:apply-templates select="." mode="content">
Packit Service 76cb02
        
Packit Service 76cb02
           select="$classsynopsis.default.language"/>
Packit Service 76cb02
      </xsl:apply-templates>
Packit Service 76cb02
    </xsl:otherwise>
Packit Service 76cb02
  </xsl:choose>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
     # Java #
Packit Service 76cb02
     ######## -->
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classsynopsis" mode="java">
Packit Service 76cb02
  <xsl:apply-templates select="ooclass[1]" mode="java"/>
Packit Service 76cb02
  <xsl:if test="ooclass[position() > 1]">
Packit Service 76cb02
    <xsl:text> extends</xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="ooclass[position() > 1]" mode="java"/>
Packit Service 76cb02
    <xsl:if test="oointerface|ooexception">
Packit Service 76cb02
      <xsl:text>
    </xsl:text>
Packit Service 76cb02
    </xsl:if>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:if test="oointerface">
Packit Service 76cb02
    <xsl:text>implements</xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="oointerface" mode="java"/>
Packit Service 76cb02
    <xsl:if test="ooexception">
Packit Service 76cb02
      <xsl:text>
    </xsl:text>
Packit Service 76cb02
    </xsl:if>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:if test="ooexception">
Packit Service 76cb02
    <xsl:text>throws</xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="ooexception" mode="java"/>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:text> {
</xsl:text>
Packit Service 76cb02
  
Packit Service 76cb02
                               |destructorsynopsis
Packit Service 76cb02
                               |fieldsynopsis
Packit Service 76cb02
                               |methodsynopsis
Packit Service 76cb02
                               |classsynopsisinfo" mode="java"/>
Packit Service 76cb02
  <xsl:text>}
</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classsynopsisinfo" mode="java">
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="ooclass|oointerface|ooexception" mode="java">
Packit Service 76cb02
  <xsl:choose>
Packit Service 76cb02
  <xsl:when test="position() > 1">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:when>
Packit Service 76cb02
  <xsl:otherwise>
Packit Service 76cb02
    <xsl:text> </xsl:text>
Packit Service 76cb02
  </xsl:otherwise>
Packit Service 76cb02
  </xsl:choose>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="modifier" mode="java">
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classname" mode="java">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'classname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="interfacename" mode="java">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'interfacename'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="exceptionname" mode="java">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'exceptionname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="fieldsynopsis" mode="java">
Packit Service 76cb02
  <xsl:text>  </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
  <xsl:text>;
</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="type" mode="java">
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="varname" mode="java">
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="initializer" mode="java">
Packit Service 76cb02
  <xsl:text>= </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="void" mode="java">
Packit Service 76cb02
  <xsl:text>void </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodname" mode="java">
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodparam" mode="java">
Packit Service 76cb02
  <xsl:param name="indent">0</xsl:param>
Packit Service 76cb02
  <xsl:if test="preceding-sibling::methodparam">
Packit Service 76cb02
    <xsl:text>,
</xsl:text>
Packit Service 76cb02
    <xsl:if test="$indent > 0">
Packit Service 76cb02
      <xsl:call-template name="copy-string">
Packit Service 76cb02
        <xsl:with-param name="string" select="' '"/>
Packit Service 76cb02
        <xsl:with-param name="count" select="$indent + 1"/>
Packit Service 76cb02
      </xsl:call-template>
Packit Service 76cb02
    </xsl:if>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="parameter" mode="java">
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
  match="constructorsynopsis|destructorsynopsis|methodsynopsis">
Packit Service 76cb02
  <xsl:variable name="modifiers" select="modifier"/>
Packit Service 76cb02
  <xsl:variable name="notmod" select="*[name(.) != 'modifier']"/>
Packit Service 76cb02
  <xsl:variable name="decl">
Packit Service 76cb02
    <xsl:text>  </xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="$modifiers" mode="java"/>
Packit Service 76cb02
Packit Service 76cb02
    
Packit Service 76cb02
    <xsl:if test="name($notmod[1]) != 'methodname'">
Packit Service 76cb02
      <xsl:apply-templates select="$notmod[1]" mode="java"/>
Packit Service 76cb02
    </xsl:if>
Packit Service 76cb02
Packit Service 76cb02
    <xsl:apply-templates select="methodname" mode="java"/>
Packit Service 76cb02
  </xsl:variable>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:copy-of select="$decl"/>
Packit Service 76cb02
  <xsl:text>(</xsl:text>
Packit Service 76cb02
  <xsl:apply-templates select="methodparam" mode="java">
Packit Service 76cb02
    <xsl:with-param name="indent" select="string-length($decl)"/>
Packit Service 76cb02
  </xsl:apply-templates>
Packit Service 76cb02
  <xsl:text>)</xsl:text>
Packit Service 76cb02
  <xsl:if test="exceptionname">
Packit Service 76cb02
    <xsl:text>
    throws </xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="exceptionname" mode="java"/>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:text>;
</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="ooclass|oointerface|ooexception" mode="java">
Packit Service 76cb02
  <xsl:choose>
Packit Service 76cb02
  <xsl:when test="position() > 1">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:when>
Packit Service 76cb02
  <xsl:otherwise>
Packit Service 76cb02
    <xsl:text> </xsl:text>
Packit Service 76cb02
  </xsl:otherwise>
Packit Service 76cb02
  </xsl:choose>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:apply-templates mode="java"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
     #  C++  #
Packit Service 76cb02
     ######### -->
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classsynopsis" mode="cpp">
Packit Service 76cb02
  <xsl:apply-templates select="ooclass[1]" mode="cpp"/>
Packit Service 76cb02
  <xsl:if test="ooclass[position() > 1]">
Packit Service 76cb02
    <xsl:text>: </xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="ooclass[position() > 1]" mode="cpp"/>
Packit Service 76cb02
    <xsl:if test="oointerface|ooexception">
Packit Service 76cb02
      <xsl:text>
    </xsl:text>
Packit Service 76cb02
    </xsl:if>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:if test="oointerface">
Packit Service 76cb02
    <xsl:text> implements</xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="oointerface" mode="cpp"/>
Packit Service 76cb02
    <xsl:if test="ooexception">
Packit Service 76cb02
      <xsl:text>
    </xsl:text>
Packit Service 76cb02
    </xsl:if>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:if test="ooexception">
Packit Service 76cb02
    <xsl:text> throws </xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="ooexception" mode="cpp"/>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:text> {

</xsl:text>
Packit Service 76cb02
  
Packit Service 76cb02
                              |destructorsynopsis
Packit Service 76cb02
                              |fieldsynopsis
Packit Service 76cb02
                              |methodsynopsis
Packit Service 76cb02
                              |classsynopsisinfo" mode="cpp"/>
Packit Service 76cb02
  <xsl:text>}
</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classsynopsisinfo" mode="cpp">
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="ooclass|oointerface|ooexception" mode="cpp">
Packit Service 76cb02
  <xsl:if test="position() > 1">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="modifier" mode="cpp">
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classname" mode="cpp">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'classname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="interfacename" mode="cpp">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'interfacename'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="exceptionname" mode="cpp">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'exceptionname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="fieldsynopsis" mode="cpp">
Packit Service 76cb02
  <xsl:text>  </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
  <xsl:text>;
</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="type" mode="cpp">
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="varname" mode="cpp">
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="initializer" mode="cpp">
Packit Service 76cb02
  <xsl:text> = </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="void" mode="cpp">
Packit Service 76cb02
  <xsl:text>void </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodname" mode="cpp">
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodparam" mode="cpp">
Packit Service 76cb02
  <xsl:if test="position() > 1">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="parameter" mode="cpp">
Packit Service 76cb02
  <xsl:apply-templates mode="cpp"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
  match="constructorsynopsis|destructorsynopsis|methodsynopsis">
Packit Service 76cb02
  <xsl:variable name="modifiers" select="modifier"/>
Packit Service 76cb02
  <xsl:variable name="notmod" select="*[name(.) != 'modifier']"/>
Packit Service 76cb02
  <xsl:variable name="type">
Packit Service 76cb02
  </xsl:variable>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:text>  </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates select="$modifiers" mode="cpp"/>
Packit Service 76cb02
Packit Service 76cb02
  
Packit Service 76cb02
  <xsl:if test="name($notmod[1]) != 'methodname'">
Packit Service 76cb02
    <xsl:apply-templates select="$notmod[1]" mode="cpp"/>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:apply-templates select="methodname" mode="cpp"/>
Packit Service 76cb02
  <xsl:text>(</xsl:text>
Packit Service 76cb02
  <xsl:apply-templates select="methodparam" mode="cpp"/>
Packit Service 76cb02
  <xsl:text>)</xsl:text>
Packit Service 76cb02
  <xsl:if test="exceptionname">
Packit Service 76cb02
    <xsl:text>
    throws </xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="exceptionname" mode="cpp"/>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:text>;
</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
     # Perl #
Packit Service 76cb02
     ######## -->
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classsynopsis" mode="perl">
Packit Service 76cb02
  <xsl:text>package </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates select="ooclass[1]" mode="perl"/>
Packit Service 76cb02
  <xsl:text>;
</xsl:text>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:if test="ooclass[position() > 1]">
Packit Service 76cb02
    <xsl:text>@ISA = (</xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="ooclass[position() > 1]" mode="perl"/>
Packit Service 76cb02
    <xsl:text>);

</xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
Packit Service 76cb02
  
Packit Service 76cb02
                              |destructorsynopsis
Packit Service 76cb02
                              |fieldsynopsis
Packit Service 76cb02
                              |methodsynopsis
Packit Service 76cb02
                              |classsynopsisinfo" mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classsynopsisinfo" mode="perl">
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="ooclass|oointerface|ooexception" mode="perl">
Packit Service 76cb02
  <xsl:if test="position() > 1">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="modifier" mode="perl">
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classname" mode="perl">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'classname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="interfacename" mode="perl">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'interfacename'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="exceptionname" mode="perl">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'exceptionname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="fieldsynopsis" mode="perl">
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
  <xsl:text>;

</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="type" mode="perl">
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="varname" mode="perl">
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="initializer" mode="perl">
Packit Service 76cb02
  <xsl:text> = </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="void" mode="perl">
Packit Service 76cb02
  <xsl:text>void </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodname" mode="perl">
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodparam" mode="perl">
Packit Service 76cb02
  <xsl:text>  my $</xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
  <xsl:text> = shift;
</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="parameter" mode="perl">
Packit Service 76cb02
  <xsl:apply-templates mode="perl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
  match="constructorsynopsis|destructorsynopsis|methodsynopsis">
Packit Service 76cb02
  <xsl:variable name="modifiers" select="modifier"/>
Packit Service 76cb02
  <xsl:variable name="notmod" select="*[name(.) != 'modifier']"/>
Packit Service 76cb02
  <xsl:variable name="type"> </xsl:variable>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:text>sub </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates select="methodname" mode="perl"/>
Packit Service 76cb02
  <xsl:text> {</xsl:text>
Packit Service 76cb02
  <xsl:if test="methodparam">
Packit Service 76cb02
    <xsl:text>
  my $this = shift;
</xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="methodparam" mode="perl"/>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:text> ... </xsl:text>
Packit Service 76cb02
  <xsl:if test="methodparam">
Packit Service 76cb02
    <xsl:text>
</xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:text>}

</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
     # IDL  #
Packit Service 76cb02
     ######## -->
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classsynopsisinfo" mode="idl">
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="ooclass|oointerface|ooexception" mode="idl">
Packit Service 76cb02
  <xsl:if test="position() > 1">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="modifier" mode="idl">
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="classname" mode="idl">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'classname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="interfacename" mode="idl">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'interfacename'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="exceptionname" mode="idl">
Packit Service 76cb02
  <xsl:if test="name(preceding-sibling::*[1]) = 'exceptionname'">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="fieldsynopsis" mode="idl">
Packit Service 76cb02
  <xsl:text>  </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
  <xsl:text>;</xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="type" mode="idl">
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
  <xsl:text> </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="varname" mode="idl">
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="initializer" mode="idl">
Packit Service 76cb02
  <xsl:text> = </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="void" mode="idl">
Packit Service 76cb02
  <xsl:text>void </xsl:text>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodname" mode="idl">
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="methodparam" mode="idl">
Packit Service 76cb02
  <xsl:if test="position() > 1">
Packit Service 76cb02
    <xsl:text>, </xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
<xsl:template match="parameter" mode="idl">
Packit Service 76cb02
  <xsl:apply-templates mode="idl"/>
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
  match="constructorsynopsis|destructorsynopsis|methodsynopsis">
Packit Service 76cb02
  <xsl:variable name="modifiers" select="modifier"/>
Packit Service 76cb02
  <xsl:variable name="notmod" select="*[name(.) != 'modifier']"/>
Packit Service 76cb02
  <xsl:variable name="type">
Packit Service 76cb02
  </xsl:variable>
Packit Service 76cb02
  
Packit Service 76cb02
  <xsl:text>  </xsl:text>
Packit Service 76cb02
  <xsl:apply-templates select="$modifiers" mode="idl"/>
Packit Service 76cb02
Packit Service 76cb02
  
Packit Service 76cb02
  <xsl:if test="name($notmod[1]) != 'methodname'">
Packit Service 76cb02
    <xsl:apply-templates select="$notmod[1]" mode="idl"/>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
Packit Service 76cb02
  <xsl:apply-templates select="methodname" mode="idl"/>
Packit Service 76cb02
  <xsl:text>(</xsl:text>
Packit Service 76cb02
  <xsl:apply-templates select="methodparam" mode="idl"/>
Packit Service 76cb02
  <xsl:text>)</xsl:text>
Packit Service 76cb02
  <xsl:if test="exceptionname">
Packit Service 76cb02
    <xsl:text>
    raises(</xsl:text>
Packit Service 76cb02
    <xsl:apply-templates select="exceptionname" mode="idl"/>
Packit Service 76cb02
    <xsl:text>)</xsl:text>
Packit Service 76cb02
  </xsl:if>
Packit Service 76cb02
  <xsl:text>;</xsl:text>
Packit Service 76cb02
  
Packit Service 76cb02
</xsl:template>
Packit Service 76cb02
Packit Service 76cb02
Packit Service 76cb02
</xsl:stylesheet>
Packit Service 76cb02