xsl-list
[Top] [All Lists]

RE: [xsl] Decimal to hexadecimal in one function (XSLT/XPath 2)

2009-02-17 07:31:59

Something like this perhaps:

<xsl:function name="my:int-to-hex" as="xs:string">
  <xsl:param name="in" as="xs:integer"/>
  <xsl:sequence select="if ($in eq 0) then '0' 
                        else concat(if ($in gt 16 then my:int-to-hex($in
idiv 16) else '',
                               substring('0123456789ABCDEF', ($in mod 16) +
1, 1)))"/>
</xsl:function>

But what's wrong with having two functions anyway?

Incidentally, do try to get into the habit of declaring your parameter and
return types. It helps people reading your code, it helps the compiler, and
it helps you.

Michael Kay
http://www.saxonica.com/

-----Original Message-----
From: Yves Forkl [mailto:Y(_dot_)Forkl(_at_)srz(_dot_)de] 
Sent: 17 February 2009 11:23
To: xsl-list
Subject: [xsl] Decimal to hexadecimal in one function (XSLT/XPath 2)

Hi,

I want to convert the decimal integers returned by the XPath 
2 function fn:string-to-codepoints into a sequence of strings 
that use the conventional "U+..." hexadecimal notation of the 
Unicode standard.

Neither the XPath 2 spec nor the XSLT FAQ offered a complete 
solution to this problem, so I developed my own. It is 
working, but I wonder how to integrate these two functions, 
which convert a decimal integer into its hexadecimal 
equivalent, into a single function which still returns just 
one string:

<xsl:function name="my:decimal-to-hex" as="xs:string">
   <xsl:param name="decimalNumber"/>
   <xsl:sequence
select="string-join(my:decimal-to-hex-internal($decimalNumber),'')"/>
</xsl:function>

<xsl:function name="my:decimal-to-hex-internal" as="xs:string+">
   <xsl:param name="decimalNumber"/>
   <xsl:variable name="hexDigits" select="'0123456789ABCDEF'"/>
   <xsl:if test="$decimalNumber &gt;= 16">
     <xsl:sequence
       
select="my:decimal-to-hex-internal(floor($decimalNumber div 16))"/>
   </xsl:if>
   <xsl:sequence
     select="substring($hexDigits, ($decimalNumber mod 16) + 
1, 1)"/> </xsl:function>


   Yves

--~------------------------------------------------------------------
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>
--~--

<Prev in Thread] Current Thread [Next in Thread>