CVS: sml-dist/src/lexgen/src/BackEnds/Dump dump-output.sml,1.1,1.2

Update of /cvsroot/smlnj/sml-dist/src/lexgen/src/BackEnds/Dump
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14104/src/lexgen/src/BackEnds/Dump

Modified Files:
	dump-output.sml 
Log Message:
improvements/bugfixes to lexgen from Aaron Turon

Index: dump-output.sml
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/lexgen/src/BackEnds/Dump/dump-output.sml,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** dump-output.sml	1 Mar 2006 04:44:29 -0000	1.1
--- dump-output.sml	1 Mar 2006 20:17:26 -0000	1.2
***************
*** 17,21 ****
      fun nameOf (LO.State{id, ...}) = "Q" ^ Int.toString id
  
!     fun prState (s as LO.State{id, label, final, next}) = let
            val name = (case final
  		       of [] => nameOf s
--- 17,21 ----
      fun nameOf (LO.State{id, ...}) = "Q" ^ Int.toString id
  
!     fun prState (s as LO.State{id, label, final, next, ...}) = let
            val name = (case final
  		       of [] => nameOf s



-------------------------------------------------------
This SF.Net email is sponsored by xPML, a groundbreaking scripting language
that extends applications into web and mobile media. Attend the live webcast
and join the prime developer group breaking into this new coding territory!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=110944&bid=241720&dat=121642