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

diff --git a/validate b/validate
index 741daac..bf007ab 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
@@ -62,7 +66,7 @@ if [ $no_clean -eq 0 ]; then
         INSTDIR=`cygpath -m "$INSTDIR"`
     fi
 
-    sh boot
+    /usr/bin/perl -w boot
     ./configure --prefix="$INSTDIR" $config_args
 fi