From 290329e5fadf8a095a7566347a4c3daca3359d37 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Wed, 8 Oct 2014 11:58:42 -0400 Subject: [PATCH] Use bytes consistently in regexmatch. Inconsistency found by Tobias Pape, see GH issue #792. --- .../tests/racket/benchmarks/shootout/regexmatch.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/regexmatch.rkt b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/regexmatch.rkt index 6dd0c9b6a9..b3089abcc7 100644 --- a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/regexmatch.rkt +++ b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/regexmatch.rkt @@ -40,7 +40,7 @@ (cond ((eof-object? line) #f) (else (set! phonelines (cons line phonelines)) - (loop (read-line))))) + (loop (read-bytes-line))))) (set! phonelines (reverse phonelines)) (do ([n (string->number n) (sub1 n)]) ((negative? n))