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

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

svn: r18141

original commit: f4321256a5
This commit is contained in:
Ryan Culpepper 2010-02-17 23:36:58 +00:00
parent 3562d9f416
commit 5d8ca32454

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)