Re: [xsl] Trying to find following sibling that ends in punctuation

Michael here is the function but it has worked perfectly(or as perfectly 
as can be) in other instances.
   <xsl:function name="f:f_StringEndsWith" as="xs:string">

       <!-- p_String to test -->
       <xsl:param name="p_String" />

       <!-- get the last character -->
       <xsl:variable name="l_LastCharacter" 
select="substring($p_String, string-length($p_String), 1)" />
       <!-- get the last two characters -->
       <xsl:variable name="l_LastTwoCharacter" 
select="substring($p_String, string-length($p_String) - 1, 2)" />
       <!-- . : ! ? -->
       <xsl:variable name="l_LastCharacterIs" select="if 
(matches($l_LastCharacter, '[&#46;]|[&#58;]|[&#33;]|[&#63;]')) then 
'punct' else 'noPunct'" />
       <!-- ." !" ?" .) !) ?) -->
       <!--xsl:variable name="l_LastTwoCharacterAre" select="if 
(matches($l_LastTwoCharacter, 
'[&#46;&#34;]|[&#33;&#34;]|[&#63;&#34;]|[&#46;&#41;]|[&#33;&#41;]|[&#63;&#41;]')) 
then 'punct' else 'noPunct'" /-->
       <!-- the above failed in a couple of instances and so the var 
and choose below works. it is in longhand for ease of maintaining -->
       <!-- ." !" ?" .) !) ?) -->
       <xsl:variable name="l_LastTwoCharacterAre">
           <xsl:choose>
               <xsl:when test="$l_LastTwoCharacter = 
'&#46;&#34;'"><xsl:value-of select="'punct'" /></xsl:when>
               <xsl:when test="$l_LastTwoCharacter = 
'&#33;&#34;'"><xsl:value-of select="'punct'" /></xsl:when>
               <xsl:when test="$l_LastTwoCharacter = 
'&#63;&#34;'"><xsl:value-of select="'punct'" /></xsl:when>
               <xsl:when test="$l_LastTwoCharacter = 
'&#46;&#41;'"><xsl:value-of select="'punct'" /></xsl:when>
               <xsl:when test="$l_LastTwoCharacter = 
'&#33;&#41;'"><xsl:value-of select="'punct'" /></xsl:when>
               <xsl:when test="$l_LastTwoCharacter = 
'&#63;&#41;'"><xsl:value-of select="'punct'" /></xsl:when>
               <xsl:otherwise><xsl:value-of select="'noPunct'" 
/></xsl:otherwise>
           </xsl:choose>
       </xsl:variable>

       <xsl:choose>
           <xsl:when test="($l_LastCharacterIs = 'punct') or 
($l_LastTwoCharacterAre = 'punct')"><xsl:value-of select="'punct'" 
/></xsl:when>
           <xsl:otherwise><xsl:value-of select="'noPunct'" 
/></xsl:otherwise>
       </xsl:choose>

   </xsl:function>

I'll add a test for an empty string and will test if any data is present.

Thanks

Mario

Michael Kay wrote:
> You haven't shown the function
>
> f:f_StringEndsWith($p_Node)
>
> You would get infinite recursion if this function always returns the value
> "noPunct" when its argument is an empty sequence.
>
> Just a theory.
>
> Michael Kay
> http://www.saxonica.com/
>  
>
>   
> > -----Original Message-----
> > From: Marijan (Mario) Madunic [mailto:hajduk(_at_)imag(_dot_)net] 
> > Sent: 04 November 2006 00:44
> > To: xsl-list(_at_)lists(_dot_)mulberrytech(_dot_)com
> > Subject: [xsl] Trying to find following sibling that ends in 
> > punctuation
> > Using XSLT 2, XPath 2, and Saxon8
> >
> > I'm trying to get the count(of preceding::*) of a following 
> > sibling node that ends with some sort of punctuation, and 
> > throw this value into a variable.
> > I've created a recurisive template
> >
> >     <xsl:template name="ct_PositionOfNodeThatEndsWithPunct">
> >
> >         <!-- set a default value for p_Node -->
> >         <xsl:param name="p_Node" 
> > select="following-sibling::*[self::P][1]" />
> >         <!-- test what the element ends with -->      
> >         <xsl:variable name="l_EndsWith" 
> > select="f:f_StringEndsWith($p_Node)" />
> >         <xsl:choose>
> >             <xsl:when test="$l_EndsWith = 'noPunct'">
> >                 <xsl:call-template
> > name="ct_PositionOfNodeThatEndsWithPunct">
> >                     <xsl:with-param name="p_Node" 
> > select="following-sibling::*[self::P][1]" />
> >                 </xsl:call-template>
> >             </xsl:when>
> >             <xsl:otherwise><xsl:value-of 
> > select="count(preceding::*) + 1" /></xsl:otherwise>
> >         </xsl:choose>
> >
> >     </xsl:template>
> >
> > Now  I was hoping that because called templates are context 
> > sensitive I can keep on just doing 
> > "select="following-sibling::*[self::P][1]" as I've done to 
> > give p_Node a new value to iterate through. I keep on getting 
> > out of memory error. Memory is not an issue as from my past 
> > experiences when I get this error when I introduce a 
> > recursive template usually means I've given the recursion no 
> > way out. But I can't see why this is happening.
> > Any insight will be greatly appreciated.
> >
> > Thanks
> >
> > Mario
> >
> >
> > --~------------------------------------------------------------------
> > XSL-List info and archive:  http://www.mulberrytech.com/xsl/xsl-list
> > To unsubscribe, go to: http://lists.mulberrytech.com/xsl-list/
> > or e-mail: <mailto:xsl-list-unsubscribe(_at_)lists(_dot_)mulberrytech(_dot_)com>
> > --~--
> >
> >     
>
> --~------------------------------------------------------------------
> XSL-List info and archive:  http://www.mulberrytech.com/xsl/xsl-list
> To unsubscribe, go to: http://lists.mulberrytech.com/xsl-list/
> or e-mail: <mailto:xsl-list-unsubscribe(_at_)lists(_dot_)mulberrytech(_dot_)com>
> --~--
>
>
>   

--~------------------------------------------------------------------
XSL-List info and archive:  http://www.mulberrytech.com/xsl/xsl-list
To unsubscribe, go to: http://lists.mulberrytech.com/xsl-list/
or e-mail: <mailto:xsl-list-unsubscribe(_at_)lists(_dot_)mulberrytech(_dot_)com>
--~--