From: Jean-Claude M. <jc...@us...> - 2003-06-27 00:49:51
|
Update of /cvsroot/ndoc/ndoc/src/Documenter/Msdn/xslt In directory sc8-pr-cvs1:/tmp/cvs-serv21310/src/Documenter/Msdn/xslt Modified Files: vb-syntax.xslt Log Message: Added attribute syntax for VB. Index: vb-syntax.xslt =================================================================== RCS file: /cvsroot/ndoc/ndoc/src/Documenter/Msdn/xslt/vb-syntax.xslt,v retrieving revision 1.24 retrieving revision 1.25 diff -C2 -d -r1.24 -r1.25 *** vb-syntax.xslt 6 Mar 2003 04:43:52 -0000 1.24 --- vb-syntax.xslt 27 Jun 2003 00:32:37 -0000 1.25 *************** *** 1,4 **** <?xml version="1.0" encoding="UTF-8" ?> ! <xsl:transform version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"> <!-- --> <xsl:param name="ndoc-vb-syntax" /> --- 1,8 ---- <?xml version="1.0" encoding="UTF-8" ?> ! <xsl:transform version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" ! xmlns:msxsl="urn:schemas-microsoft-com:xslt" ! xmlns:user="urn:my-scripts" ! exclude-result-prefixes="msxsl user" ! > <!-- --> <xsl:param name="ndoc-vb-syntax" /> *************** *** 54,110 **** <div class="syntax"> <span class="lang">[Visual Basic]</span> ! <div> ! <xsl:if test="@abstract = 'true'"> ! <xsl:text>MustInherit </xsl:text> ! </xsl:if> ! <xsl:if test="@sealed = 'true'"> ! <xsl:text>NotInheritable </xsl:text> ! </xsl:if> ! <xsl:call-template name="vb-type-access"> ! <xsl:with-param name="access" select="@access" /> ! <xsl:with-param name="type" select="local-name()" /> ! </xsl:call-template> ! <xsl:text> </xsl:text> ! <xsl:choose> ! <xsl:when test="local-name() = 'class'">Class</xsl:when> ! <xsl:when test="local-name() = 'interface'">Interface</xsl:when> ! <xsl:when test="local-name() = 'structure'">Structure</xsl:when> ! <xsl:when test="local-name() = 'enumeration'">Enum</xsl:when> ! <xsl:when test="local-name() = 'delegate'"> ! <xsl:text>Delegate </xsl:text> ! <xsl:choose> ! <xsl:when test="@returnType = 'System.Void'">Sub</xsl:when> ! <xsl:otherwise>Function</xsl:otherwise> ! </xsl:choose> ! </xsl:when> ! <xsl:otherwise>ERROR</xsl:otherwise> ! </xsl:choose> ! <xsl:text> </xsl:text> ! <xsl:value-of select="@name" /> ! <xsl:choose> ! <xsl:when test="local-name() != 'delegate'"> ! <xsl:if test="@baseType"> ! <div> ! <xsl:text>Inherits </xsl:text> ! <xsl:value-of select="@baseType" /> ! </div> ! </xsl:if> ! <xsl:if test="implements[not(@inherited)]"> ! <div> ! <xsl:text>Implements </xsl:text> ! <xsl:for-each select="implements[not(@inherited)]"> ! <xsl:value-of select="." /> ! <xsl:if test="position()!=last()"> ! <xsl:text>, </xsl:text> ! </xsl:if> ! </xsl:for-each> ! </div> ! </xsl:if> ! </xsl:when> ! <xsl:otherwise> ! <xsl:call-template name="vb-parameters" /> ! </xsl:otherwise> ! </xsl:choose> ! </div> </div> </xsl:if> --- 58,114 ---- <div class="syntax"> <span class="lang">[Visual Basic]</span> ! <br/> ! <xsl:call-template name="vb-attributes"/> ! <xsl:if test="@abstract = 'true'"> ! <xsl:text>MustInherit </xsl:text> ! </xsl:if> ! <xsl:if test="@sealed = 'true'"> ! <xsl:text>NotInheritable </xsl:text> ! </xsl:if> ! <xsl:call-template name="vb-type-access"> ! <xsl:with-param name="access" select="@access" /> ! <xsl:with-param name="type" select="local-name()" /> ! </xsl:call-template> ! <xsl:text> </xsl:text> ! <xsl:choose> ! <xsl:when test="local-name() = 'class'">Class</xsl:when> ! <xsl:when test="local-name() = 'interface'">Interface</xsl:when> ! <xsl:when test="local-name() = 'structure'">Structure</xsl:when> ! <xsl:when test="local-name() = 'enumeration'">Enum</xsl:when> ! <xsl:when test="local-name() = 'delegate'"> ! <xsl:text>Delegate </xsl:text> ! <xsl:choose> ! <xsl:when test="@returnType = 'System.Void'">Sub</xsl:when> ! <xsl:otherwise>Function</xsl:otherwise> ! </xsl:choose> ! </xsl:when> ! <xsl:otherwise>ERROR</xsl:otherwise> ! </xsl:choose> ! <xsl:text> </xsl:text> ! <xsl:value-of select="@name" /> ! <xsl:choose> ! <xsl:when test="local-name() != 'delegate'"> ! <xsl:if test="@baseType"> ! <div> ! <xsl:text>Inherits </xsl:text> ! <xsl:value-of select="@baseType" /> ! </div> ! </xsl:if> ! <xsl:if test="implements[not(@inherited)]"> ! <div> ! <xsl:text>Implements </xsl:text> ! <xsl:for-each select="implements[not(@inherited)]"> ! <xsl:value-of select="." /> ! <xsl:if test="position()!=last()"> ! <xsl:text>, </xsl:text> ! </xsl:if> ! </xsl:for-each> ! </div> ! </xsl:if> ! </xsl:when> ! <xsl:otherwise> ! <xsl:call-template name="vb-parameters" /> ! </xsl:otherwise> ! </xsl:choose> </div> </xsl:if> *************** *** 214,217 **** --- 218,222 ---- <span class="lang">[Visual Basic]</span> <br /> + <xsl:call-template name="vb-attributes"/> <xsl:choose> <xsl:when test="local-name() != 'operator'"> *************** *** 287,290 **** --- 292,296 ---- <span class="lang">[Visual Basic]</span> <br /> + <xsl:call-template name="vb-attributes"/> <xsl:if test="not(parent::interface)"> <xsl:call-template name="vb-method-access"> *************** *** 320,323 **** --- 326,330 ---- <xsl:template name="vb-property-syntax"> <xsl:if test="$ndoc-vb-syntax"> + <xsl:call-template name="vb-attributes"/> <xsl:if test="not(parent::interface)"> <xsl:choose> *************** *** 373,376 **** --- 380,420 ---- <xsl:value-of select="implements/@interface" /><xsl:text>.</xsl:text><xsl:value-of select="implements/@name" /> </xsl:if> + </xsl:if> + </xsl:template> + <!-- --> + <!-- ATTRIBUTES --> + <xsl:template name="vb-attributes"> + <xsl:if test="$ndoc-document-attributes"> + <xsl:if test="attribute"> + <xsl:for-each select="attribute"> + <div class="attribute"><xsl:call-template name="vb-attribute"> + <xsl:with-param name="attname" select="@name" /> + </xsl:call-template></div> + </xsl:for-each> + </xsl:if> + </xsl:if> + </xsl:template> + <!-- --> + <xsl:template name="vb-attribute"> + <xsl:param name="attname" /> + <xsl:if test="user:isAttributeWanted($ndoc-documented-attributes, @name)"> + <xsl:text><</xsl:text> + <xsl:call-template name="strip-namespace-and-attribute"> + <xsl:with-param name="name" select="@name" /> + </xsl:call-template> + <xsl:if test="count(property) > 0"> + <xsl:text>(</xsl:text> + <xsl:for-each select="property"> + <xsl:if test="user:isPropertyWanted($ndoc-documented-attributes, @name) and @value!=''"> + <xsl:value-of select="@name" /> + <xsl:text>="</xsl:text> + <xsl:value-of select="@value" /> + <xsl:text>"</xsl:text> + <xsl:if test="position()!=last()"><xsl:text>, </xsl:text></xsl:if> + </xsl:if> + </xsl:for-each> + <xsl:text>)</xsl:text> + </xsl:if> + <xsl:text>></xsl:text> </xsl:if> </xsl:template> |