X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=darcs-all;h=579bc5cd15bdb2883da4fa8692933b0c66997a89;hb=6e2cffab037ee968dc49658ba75cc03beabcb769;hp=aecf6340b79e21f7fe27b05013df912825635789;hpb=345a81cac5ec23158160dcfa3a92cf132ee8e3d8;p=ghc-hetmet.git

diff --git a/darcs-all b/darcs-all
index aecf634..579bc5c 100644
--- a/darcs-all
+++ b/darcs-all
@@ -9,14 +9,14 @@ default_lib_repo_root=$default_repo_root/packages
 
 quiet=NO
 
-function message()
+message()
 {
   if [ "$quiet" = "NO" ]; then
      echo $*
   fi
 }
 
-function darcsall()
+darcsall()
 {
   message "== running darcs $* at the top level"
   darcs $*
@@ -38,7 +38,7 @@ function darcsall()
   done
 }
 
-function darcsget()
+darcsget()
 {
   case $* in
     *--partial*) ;;
@@ -63,7 +63,7 @@ function darcsget()
   done
 }
 
-if test ! -d _darcs; then
+if test ! -d _darcs -o ! -d compiler; then
   echo "error: darcs-all must be run from the top level of the ghc tree."
   exit 1;
 fi