CVS: sml-dist/src/compiler/FLINT/main literals.sml,1.11,1.12

Update of /cvsroot/smlnj/sml-dist/src/compiler/FLINT/main
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18358/src/compiler/FLINT/main

Modified Files:
	literals.sml 
Log Message:
long long results implemented

Index: literals.sml
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/compiler/FLINT/main/literals.sml,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** literals.sml	23 Mar 2002 21:14:39 -0000	1.11
--- literals.sml	10 Feb 2005 23:54:05 -0000	1.12
***************
*** 465,471 ****
                  in hh(PURE(p, nl, v, t, loop e))
                 end
! 	   | RCC (k, l, p, ul, v, t, e) =>
  	       let val (nl, hh) = lpvs ul
! 	        in hh(RCC(k, l, p, nl, v, t, loop e))
  	       end)
  
--- 465,471 ----
                  in hh(PURE(p, nl, v, t, loop e))
                 end
! 	   | RCC (k, l, p, ul, vtl, e) =>
  	       let val (nl, hh) = lpvs ul
! 	        in hh(RCC(k, l, p, nl, vtl, loop e))
  	       end)
  



-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click