From f4321256a5efb6e4bde3e9aef2f73e3bdb09aa51 Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Wed, 17 Feb 2010 23:36:58 +0000 Subject: [PATCH] compiler/zo-parse: fixed to work on Mac/PPC zo writer seems to always write integers in little-endian order svn: r18141 --- collects/compiler/zo-parse.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/compiler/zo-parse.ss b/collects/compiler/zo-parse.ss index 8a3daddd2c..c6d1e0b9e3 100644 --- a/collects/compiler/zo-parse.ss +++ b/collects/compiler/zo-parse.ss @@ -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)