[m-rev.] trivial diff: fix failing test case

Mark Brown dougl at cs.mu.OZ.AU
Sun Nov 10 05:48:57 AEDT 2002


Estimated hours taken: 0.1
Branches: main

tests/debugger/declarative/Mmakefile:
tests/debugger/declarative/solutions.exp2:
	Pipe the output of this test through sed to avoid a dependency
	on line numbers in the standard library.

Index: tests/debugger/declarative/Mmakefile
===================================================================
RCS file: /home/mercury1/repository/tests/debugger/declarative/Mmakefile,v
retrieving revision 1.53
diff -u -r1.53 Mmakefile
--- tests/debugger/declarative/Mmakefile	4 Nov 2002 15:06:08 -0000	1.53
+++ tests/debugger/declarative/Mmakefile	9 Nov 2002 18:38:58 -0000
@@ -220,8 +220,12 @@
 small.out: small small.inp
 	$(MDB) ./small < small.inp > small.out 2>&1
 
+# We need to pipe the output through sed to avoid hard-coding dependencies on
+# particular line numbers in the standard library source code.
 solutions.out: solutions solutions.$(INP)
-	$(MDB) ./solutions < solutions.$(INP) > solutions.out 2>&1
+	$(MDB) ./solutions < solutions.$(INP) 2>&1 | \
+		sed -e 's/std_util.m:[0-9]*/std_util.m:NNNN/g' \
+		> solutions.out 2>&1
 
 special_term_dep.out: special_term_dep special_term_dep.inp
 	$(MDB_STD) ./special_term_dep < special_term_dep.inp \
Index: tests/debugger/declarative/solutions.exp2
===================================================================
RCS file: /home/mercury1/repository/tests/debugger/declarative/solutions.exp2,v
retrieving revision 1.1
diff -u -r1.1 solutions.exp2
--- tests/debugger/declarative/solutions.exp2	8 Sep 2002 15:47:04 -0000	1.1
+++ tests/debugger/declarative/solutions.exp2	9 Nov 2002 18:42:39 -0000
@@ -28,5 +28,5 @@
 Found incorrect contour:
 solutions(q(1), [1, 2, 3])
 Is this a bug? yes
-      16:      3  3 EXIT pred std_util:solutions/2-1 (det) std_util.m:1403 (solutions.m:16)
+      16:      3  3 EXIT pred std_util:solutions/2-1 (det) std_util.m:NNNN (solutions.m:16)
 mdb> quit -y
--------------------------------------------------------------------------
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