[m-rev.] trivial diff: fix debugger test case failure
Simon Taylor
stayl at cs.mu.OZ.AU
Sun Dec 16 15:46:31 AEDT 2001
Estimated hours taken: 0.1
Branches: main
tests/debugger/Mmakefile:
tests/debugger/loopcheck.exp2:
Avoid dependencies on the line number of `error/1'.
Index: Mmakefile
===================================================================
RCS file: /home/mercury1/repository/tests/debugger/Mmakefile,v
retrieving revision 1.58
diff -u -u -r1.58 Mmakefile
--- Mmakefile 11 Dec 2001 09:01:21 -0000 1.58
+++ Mmakefile 16 Dec 2001 04:39:04 -0000
@@ -183,13 +183,15 @@
if $(MDB) ./loopcheck < loopcheck.inp \
> loopcheck.tmp 2>&1; \
then \
- sed -e '/EXCP/s/).*/)/' < loopcheck.tmp \
- > loopcheck.out 2>&1; \
+ sed -e '/EXCP/s/).*/)/' \
+ -e 's/require.m:[0-9]*/require.m:NNNN/g' \
+ < loopcheck.tmp > loopcheck.out 2>&1; \
rm loopcheck.tmp; \
false; \
else \
- sed -e '/EXCP/s/).*/)/' < loopcheck.tmp \
- > loopcheck.out 2>&1; \
+ sed -e '/EXCP/s/).*/)/' \
+ -e 's/require.m:[0-9]*/require.m:NNNN/g' \
+ < loopcheck.tmp > loopcheck.out 2>&1; \
rm loopcheck.tmp; \
true; \
fi
Index: loopcheck.exp2
===================================================================
RCS file: /home/mercury1/repository/tests/debugger/loopcheck.exp2,v
retrieving revision 1.6
diff -u -u -r1.6 loopcheck.exp2
--- loopcheck.exp2 30 Mar 2001 03:59:18 -0000 1.6
+++ loopcheck.exp2 16 Dec 2001 04:39:35 -0000
@@ -17,9 +17,9 @@
7: 3 3 THEN pred loopcheck:loop/1-0 (erroneous) c2;e;t;
loopcheck.m:21
8: 4 4 CALL pred require:error/1-0 (erroneous)
- require.m:89 (from loopcheck.m:21)
+ require.m:NNNN (from loopcheck.m:21)
9: 4 4 EXCP pred require:error/1-0 (erroneous)
- require.m:90 (from loopcheck.m:21)
+ require.m:NNNN (from loopcheck.m:21)
10: 3 3 EXCP pred loopcheck:loop/1-0 (erroneous)
loopcheck.m:21 (from loopcheck.m:21)
11: 2 2 EXCP pred loopcheck:loop/1-0 (erroneous)
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------
More information about the reviews
mailing list