CVS: sml-dist/src/cml/src/Unix new-unix.sml,1.3,1.4

Update of /cvsroot/smlnj/sml-dist/src/cml/src/Unix
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4095/src/cml/src/Unix

Modified Files:
	new-unix.sml 
Log Message:
fixed bug in xxxArraySlice.update; pushed Basis changes through

Index: new-unix.sml
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/cml/src/Unix/new-unix.sml,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** new-unix.sml	4 Jun 2004 15:59:11 -0000	1.3
--- new-unix.sml	7 Nov 2005 23:03:17 -0000	1.4
***************
*** 66,70 ****
                  PIO.close (#infd p2)
                )
!           val base = SS.string(SS.taker (fn c => c <> #"/") (SS.all cmd))
            fun startChild () = (case protect PP.fork ()
  		 of SOME pid => pid           (* parent *)
--- 66,70 ----
                  PIO.close (#infd p2)
                )
!           val base = SS.string(SS.taker (fn c => c <> #"/") (SS.full cmd))
            fun startChild () = (case protect PP.fork ()
  		 of SOME pid => pid           (* parent *)



-------------------------------------------------------
SF.Net email is sponsored by:
Tame your development challenges with Apache's Geronimo App Server. Download
it for free - -and be entered to win a 42" plasma tv or your very own
Sony(tm)PSP.  Click here to play: http://sourceforge.net/geronimo.php