From 4f501726fbe87e42b891e6e08c29082917da6d54 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Mon, 21 Jun 2010 17:52:05 -0400 Subject: [PATCH] Fixed a bug in the shootout harness. --- collects/tests/racket/benchmarks/shootout/run.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/tests/racket/benchmarks/shootout/run.rkt b/collects/tests/racket/benchmarks/shootout/run.rkt index 4051225592..4d43b31b44 100644 --- a/collects/tests/racket/benchmarks/shootout/run.rkt +++ b/collects/tests/racket/benchmarks/shootout/run.rkt @@ -93,7 +93,7 @@ (printf "Building FASTA ~a output for input: ~a\n" n f) (with-output-to-file f (lambda () - (parameterize ([current-command-line-arguments (vector n)] + (parameterize ([current-command-line-arguments (vector (number->string n))] [current-load-relative-directory here]) (dynamic-require "fasta.rkt" #f))))) f))