From 277fad6c1f43a4aecca32f8167df4ff96d631024 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 29 Jan 2007 12:59:11 +0000
Subject: [PATCH] fix benchmark name

svn: r5497
---
 .../benchmarks/shootout/{spectralnorm.ss => k-nucleotide.ss}    | 2 +-
 collects/tests/mzscheme/benchmarks/shootout/run.ss              | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)
 rename collects/tests/mzscheme/benchmarks/shootout/{spectralnorm.ss => k-nucleotide.ss} (98%)

diff --git a/collects/tests/mzscheme/benchmarks/shootout/spectralnorm.ss b/collects/tests/mzscheme/benchmarks/shootout/k-nucleotide.ss
similarity index 98%
rename from collects/tests/mzscheme/benchmarks/shootout/spectralnorm.ss
rename to collects/tests/mzscheme/benchmarks/shootout/k-nucleotide.ss
index f144188949..8f5d121c41 100644
--- a/collects/tests/mzscheme/benchmarks/shootout/spectralnorm.ss
+++ b/collects/tests/mzscheme/benchmarks/shootout/k-nucleotide.ss
@@ -9,7 +9,7 @@
 # modified by Sokolov Yura
 |#
 
-(module spectralnorm mzscheme
+(module k-nucleotide mzscheme
   (require (lib "list.ss")
            (lib "string.ss")
            (only (lib "13.ss" "srfi") string-pad-right))
diff --git a/collects/tests/mzscheme/benchmarks/shootout/run.ss b/collects/tests/mzscheme/benchmarks/shootout/run.ss
index 5fe0cab467..5c3d2cc2a5 100644
--- a/collects/tests/mzscheme/benchmarks/shootout/run.ss
+++ b/collects/tests/mzscheme/benchmarks/shootout/run.ss
@@ -30,6 +30,7 @@
       ("regexmatch.ss")
       ("regexpdna.ss")
       ("reversecomplement.ss" #f ,(lambda () (mk-revcomp-input)))
+      ("k-nucleotide.ss" #f ,(lambda () (mk-knuc-input)))
       ("reversefile.ss")
       ("sieve.ss" "1200")
       ("spellcheck.ss")