CVS: sml-dist/src/eXene/styles parse-resource-specs.sml,1.3,1.4

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

Modified Files:
	parse-resource-specs.sml 
Log Message:
fixed bug in xxxArraySlice.update; pushed Basis changes through

Index: parse-resource-specs.sml
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/eXene/styles/parse-resource-specs.sml,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** parse-resource-specs.sml	8 Sep 2000 02:09:17 -0000	1.3
--- parse-resource-specs.sml	7 Nov 2005 23:03:18 -0000	1.4
***************
*** 194,198 ****
  		val (prefix, rest) =
  		      SS.splitl (fn (#"\\" | #"\n") => false | _ => true) ss
! 		fun add (c, rest) = scan (rest, (SS.all c)::prefix::chunks)
  		in
  		  case (SS.getc rest)
--- 194,198 ----
  		val (prefix, rest) =
  		      SS.splitl (fn (#"\\" | #"\n") => false | _ => true) ss
! 		fun add (c, rest) = scan (rest, (SS.full c)::prefix::chunks)
  		in
  		  case (SS.getc rest)
***************
*** 214,218 ****
  		end
  	  in
! 	    scan (SS.triml i (SS.all s), [])
  	  end
  
--- 214,218 ----
  		end
  	  in
! 	    scan (SS.triml i (SS.full s), [])
  	  end
  



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