Fix an nasty black hole, concerning computation of isRecursiveTyCon

[ghc-hetmet.git] / validate

diff --git a/validate b/validate
index 5d0afb4..b364f57 100644 (file)
--- a/validate
+++ b/validate
@@ -48,7 +48,7 @@ done
 if [ "$CPUS" = "" ]; then
     threads=2
 else
-    threads=`expr $CPUS + 1`
+    threads=$((($CPUS + 1) * 2)) # `expr $CPUS + 1`
 fi
 
 if [ $testsuite_only -eq 0 ]; then
@@ -64,6 +64,10 @@ if [ $no_clean -eq 0 ]; then
             then
                 config_args="$config_args --with-gcc=c:/mingw/bin/gcc"
             fi
+            if [ -f c:/mingw/bin/ld.exe ]
+            then
+                config_args="$config_args --with-ld=c:/mingw/bin/ld"
+            fi
             ;;
     esac