From a6eb219305a8c2e9d7fc820c97f20e1eb4ad8f2f Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 5 Dec 2012 13:37:25 -0600 Subject: [PATCH] avoid spurious arity mismatch in {s,n}boyer benchmarks --- collects/tests/racket/benchmarks/common/nboyer.sch | 2 +- collects/tests/racket/benchmarks/common/sboyer.sch | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/tests/racket/benchmarks/common/nboyer.sch b/collects/tests/racket/benchmarks/common/nboyer.sch index c7e887a29b..d3b890450f 100644 --- a/collects/tests/racket/benchmarks/common/nboyer.sch +++ b/collects/tests/racket/benchmarks/common/nboyer.sch @@ -61,7 +61,7 @@ (time (test-boyer n)))) (define (setup-boyer) #t) ; assigned below -(define (test-boyer) #t) ; assigned below +(define (test-boyer n) #t) ; assigned below ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; diff --git a/collects/tests/racket/benchmarks/common/sboyer.sch b/collects/tests/racket/benchmarks/common/sboyer.sch index 37befe9d87..585e9740e3 100644 --- a/collects/tests/racket/benchmarks/common/sboyer.sch +++ b/collects/tests/racket/benchmarks/common/sboyer.sch @@ -62,7 +62,7 @@ (time (test-boyer n)))) (define (setup-boyer) #t) ; assigned below -(define (test-boyer) #t) ; assigned below +(define (test-boyer n) #t) ; assigned below (define (id x) x)