[m-dev.] trivial diff: exit status of tests/debugger/exception_vars

[Fergus Henderson]

Estimated hours taken: 0.25

tests/debugger/Mmakefile:
	For the exception_vars test, fail if it returns zero exit
	status, rather than failing if it returns a non-zero exit
	status.  This test case is _supposed_ to return a non-zero
	exit status, since it exits by throwing an exception.

Workspace: /d-drive/home/hg/fjh/ws-hg2/mercury
Index: tests/debugger/Mmakefile
===================================================================
RCS file: /home/mercury1/repository/tests/debugger/Mmakefile,v
retrieving revision 1.31
diff -u -d -r1.31 Mmakefile
--- tests/debugger/Mmakefile	1999/12/10 04:23:49	1.31
+++ tests/debugger/Mmakefile	1999/12/13 03:59:20
@@ -72,8 +72,16 @@
 debugger_regs.out: debugger_regs debugger_regs.inp
 	$(MDB) ./debugger_regs < debugger_regs.inp > debugger_regs.out 2>&1
 
+# The exception_vars test is supposed to return a non-zero
+# exit status, since it exits by throwing an exception.
 exception_vars.out: exception_vars exception_vars.inp
-	$(MDB) ./exception_vars < exception_vars.inp > exception_vars.out 2>&1
+	if $(MDB) ./exception_vars < exception_vars.inp		\
+		> exception_vars.out 2>&1;			\
+	then							\
+		true;						\
+	else							\
+		false;						\
+	fi
 
 existential_type_classes.out: existential_type_classes \
 			existential_type_classes.inp

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
WWW: <http://www.cs.mu.oz.au/~fjh>  |  of excellence is a lethal habit"
PGP: finger fjh at 128.250.37.3        |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------