Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Tracker SCM

SCM Repository

[smlnj] Diff of /sml/trunk/src/cm/stable/stabilize.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/stable/stabilize.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1349, Wed Sep 3 22:22:18 2003 UTC revision 1350, Fri Sep 5 21:34:27 2003 UTC
# Line 973  Line 973 
973                      val a = Word8Array.array (4, 0w0)                      val a = Word8Array.array (4, 0w0)
974                      val _ = Pack32Big.update (a, 0, LargeWord.fromInt i)                      val _ = Pack32Big.update (a, 0, LargeWord.fromInt i)
975                  in                  in
976                      BinIO.output (s, Word8Array.extract (a, 0, NONE))                      BinIO.output (s, Word8Array.vector a)
977                  end                  end
978                  val memberlist = rev (!members)                  val memberlist = rev (!members)
979    

Legend:
Removed from v.1349  
changed lines
  Added in v.1350

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0