<HTML><BODY style="word-wrap: break-word; -khtml-nbsp-mode: space; -khtml-line-break: after-white-space; "><DIV>PackReal.toBytes was returning a reference to a single globally defined array.  I changed pack-real.sml from:</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>local</DIV><DIV>   val a = ArrayUninit bytesPerElem</DIV><DIV>in</DIV><DIV>   fun toBytes (r: real): Word8Vector.vector =</DIV><DIV>      (updA (a, 0, r)</DIV><DIV>       ; Word8Vector.fromPoly (Vector.fromArray a))</DIV><DIV>end</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>to:</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>fun toBytes (r: real): Word8Vector.vector =</DIV><DIV>   let</DIV><DIV>      val a = Array.arrayUninit bytesPerElem</DIV><DIV>   in</DIV><DIV>     updA (a, 0, r)</DIV><DIV>     ; Word8Vector.fromPoly (Vector.fromArray a)</DIV><DIV>   end</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>and it seems to work fine.  Someone please confirm that this is the Right Thing™.</DIV><BR><DIV> <SPAN class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><DIV>-- </DIV><DIV>Eric McCorkle</DIV><DIV>Brown University</DIV><DIV>CS Graduate Student</DIV><DIV><BR class="khtml-block-placeholder"></DIV><BR class="Apple-interchange-newline"></SPAN> </DIV><BR></BODY></HTML>