X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=validate;h=01d6a829e604270d697028b3be8bcaf07f3d83f4;hb=6eb7886a38836b8a6d7445d2003271b4e2125034;hp=741daacecb2b02fc666afbbf7ae74ce698d0a147;hpb=9347ce0f49a584fd87f9048d95972137b2c225ff;p=ghc-hetmet.git

diff --git a/validate b/validate
index 741daac..01d6a82 100644
--- a/validate
+++ b/validate
@@ -45,10 +45,14 @@ do
     shift
 done
 
-if [ "$CPUS" = "" ]; then
-    threads=2
+if [ "$THREADS" = "" ]; then
+    if [ "$CPUS" = "" ]; then
+        threads=2
+    else
+        threads=$(($CPUS + 1)) # `expr $CPUS + 1`
+    fi
 else
-    threads=$(($CPUS + 1)) # `expr $CPUS + 1`
+    threads="$THREADS"
 fi
 
 if [ $testsuite_only -eq 0 ]; then