[project @ 2003-10-21 13:27:13 by simonmar]
authorsimonmar <unknown>
Tue, 21 Oct 2003 13:27:13 +0000 (13:27 +0000)
committersimonmar <unknown>
Tue, 21 Oct 2003 13:27:13 +0000 (13:27 +0000)
commita0527fc18dd66c1b6bef7d7e9f5bd7d1af51394a
tree8d15299ef007f16f1cf27e7ce1761847ccf21cd4
parented492ba62440cdfced0a12e35415d701988a77b7
[project @ 2003-10-21 13:27:13 by simonmar]
Make peekArray0 run in constant stack-space by testing the length of
the array first, then calling peekArray (which works backwards from
the end so it can be tail-recursive).
Foreign/Marshal/Array.hs