compiler/zo-parse: fixed to work on Mac/PPC

zo writer seems to always write integers in little-endian order

svn: r18141
This commit is contained in:
Ryan Culpepper 2010-02-17 23:36:58 +00:00
parent 124dbe9b93
commit f4321256a5

View File

@ -346,7 +346,7 @@
(let loop ([so so])
(if (zero? (bytes-length so))
null
(cons (integer-bytes->integer (subbytes so 0 n) #f)
(cons (integer-bytes->integer (subbytes so 0 n) #f #f)
(loop (subbytes so n))))))
(define (read-simple-number p)