diff --git a/collects/tests/mzscheme/benchmarks/shootout/cheapconcurrency.ss b/collects/tests/mzscheme/benchmarks/shootout/cheapconcurrency.ss
index 8bfc389cc7..ea035a9298 100644
--- a/collects/tests/mzscheme/benchmarks/shootout/cheapconcurrency.ss
+++ b/collects/tests/mzscheme/benchmarks/shootout/cheapconcurrency.ss
@@ -14,8 +14,7 @@
   (let ([n (string->number 
 	    (vector-ref (current-command-line-arguments) 0))])
     (let* ([start-ch (make-channel)]
-	   [end-ch (parameterize ([current-thread-initial-stack-size 3])
-		     (generate start-ch 500))])
+	   [end-ch (generate start-ch 500)])
       (let loop ([n n][total 0])
 	(if (zero? n)
 	    (printf "~a\n" total)