CVS: sml/src/system/Basis/Implementation num-format.sml,1.3,1.4

Update of /cvsroot/smlnj/sml/src/system/Basis/Implementation
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10490

Modified Files:
	num-format.sml 
Log Message:
  Basis semantics fix: hexidecimal digits should be upper case.


Index: num-format.sml
===================================================================
RCS file: /cvsroot/smlnj/sml/src/system/Basis/Implementation/num-format.sml,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** num-format.sml	28 Aug 2003 21:59:11 -0000	1.3
--- num-format.sml	28 Oct 2005 19:17:56 -0000	1.4
***************
*** 25,29 ****
  
      fun mkDigit (w : Word32.word) =
! 	  InlineT.CharVector.sub("0123456789abcdef", W.toInt w)
  
      fun wordToBin w = let
--- 25,29 ----
  
      fun mkDigit (w : Word32.word) =
! 	  InlineT.CharVector.sub("0123456789ABCDEF", W.toInt w)
  
      fun wordToBin w = let



-------------------------------------------------------
This SF.Net email is sponsored by the JBoss Inc.
Get Certified Today * Register for a JBoss Training Course
Free Certification Exam for All Training Attendees Through End of 2005
Visit http://www.jboss.com/services/certification for more information