[m-rev.] diff: tools/test_mercury: checkout GCC sources

[Fergus Henderson]

Estimated hours taken: 0.25
Branches: main

tools/test_mercury:
	Ensure that we check out the GCC sources if we're testing the
	GCC back-end.

Index: test_mercury
===================================================================
RCS file: /home/mercury1/repository/mercury/tools/test_mercury,v
retrieving revision 1.204
diff -u -d -r1.204 test_mercury
--- test_mercury	2002/10/01 09:16:34	1.204
+++ test_mercury	2002/10/01 10:55:02
@@ -492,8 +492,16 @@
 # and the main branch (where it is generated automatically).
 rm -f mercury/extras/dynamic_linking/dl.m
 cvs checkout $CHECKOUT_OPTS mercury tests || { false; exit 1; }
-case $HOST in
-	hg)
+case "$C_COMPILER" in
+	asm)	with_asm=true ;;
+	*)	case $HOST in
+			hg)	with_asm=true ;;
+			*)	with_asm=false ;;
+		esac
+		;;
+esac
+case "$with_asm" in
+	true)
 		# Check out the Mercury gcc back-end interface sources
 		cvs checkout $CHECKOUT_OPTS mercury-gcc || { false; exit 1; }
 		# Check out the main gcc sources.

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
The University of Melbourne         |  of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh>  |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------