[MLton] {to/from}Poly Bug?

[Wesley W. Terpstra]

Maybe I've misunderstood the intention of these methods?

terpstra at orange:~$ cat bug.sml
val x = Word8Array.array (10, 0w0)
val y : Word8.word array = MLton.Word8Array.toPoly x

terpstra at orange:~$ mlton bug.sml
Error: bug.sml 2.5.
  Pattern and expression disagree.
    pattern:    [Word8.word] array
    expression: [MLton.Word8Array.elem] array
    in: (y): Word8.word array = MLton.Word8Array.toPoly x
compilation aborted: parseAndElaborate reported errors