[m-rev.] diff: test_mercury: ease-of-use improvements

[Fergus Henderson]

Estimated hours taken: 0.5
Branches: main

Some more improvements to make it easier to run our nightly tests on new hosts.

tools/run_all_tests_from_cron:
	Create the necessary directories automatically if they don't exist
	already.
	Use the version of config.guess from the Mercury repository
	rather than assuming it is in the PATH.

Workspace: /c/fjh/ws/1
Index: tools/run_all_tests_from_cron
===================================================================
RCS file: /home/mercury1/repository/mercury/tools/run_all_tests_from_cron,v
retrieving revision 1.54
diff -u -d -r1.54 run_all_tests_from_cron
--- tools/run_all_tests_from_cron	23 Sep 2002 17:22:24 -0000	1.54
+++ tools/run_all_tests_from_cron	6 Oct 2002 18:51:50 -0000
@@ -52,9 +52,6 @@
 fi
 export CVSROOT
 
-FULLARCH="`config.guess`"
-ARCH="`expr $FULLARCH : '\([^-]*\)-.*' `"
-
 #-----------------------------------------------------------------------------#
 
 # Redirect all output to $tmpfile to stop cron mailing
@@ -67,6 +64,10 @@
 cp mercury/tools/test_mercury $tmpscript
 
 cvs checkout mercury/tools/generate_index_html
+cvs checkout mercury/config.guess
+
+FULLARCH="`./mercury/config.guess`"
+ARCH="`expr $FULLARCH : '\([^-]*\)-.*' `"
 
 #-----------------------------------------------------------------------------#
 
@@ -128,6 +129,9 @@
 	*)	logname="test-$BRANCH-$HOST-$C_COMPILER" ;;
 esac
 
+[ -d $tm_dir/logs ] || mkdir -p $tm_dir/logs ]
+[ -d $tm_dir/logs/old ] || mkdir -p $tm_dir/logs/old ]
+[ -d $tm_dir/logs/old2 ] || mkdir -p $tm_dir/logs/old2 ]
 mv -f $tm_dir/logs/old/$logname.out $tm_dir/logs/old2 2>/dev/null
 mv -f $tm_dir/logs/old/$logname.out.errs $tm_dir/logs/old2 2>/dev/null
 mv -f $tm_dir/logs/old/$logname.test_errs $tm_dir/logs/old2 2>/dev/null
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------