[m-rev.] diff: fix exported_eqv_type test case

[Zoltan Somogyi]

tests/debugger/Mmakefile:
	Standardize event and call numbers in the exported_eqv_type test case
	to allow the same .exp file to work in both debug and nondebug grades.

tests/debugger/exported_eqv_type.exp:
	Replace event and call numbers with standardized versions.

Zoltan.

cvs diff: Diffing .
Index: Mmakefile
===================================================================
RCS file: /home/mercury/mercury1/repository/tests/debugger/Mmakefile,v
retrieving revision 1.103
diff -u -b -r1.103 Mmakefile
--- Mmakefile	1 Apr 2004 04:34:24 -0000	1.103
+++ Mmakefile	2 Apr 2004 05:00:22 -0000
@@ -297,7 +297,7 @@
 		> existential_type_classes.out
 
 exported_eqv_type.out: exported_eqv_type exported_eqv_type.inp
-	$(MDB) ./exported_eqv_type < exported_eqv_type.inp > exported_eqv_type.out 2>&1
+	$(MDB_STD) ./exported_eqv_type < exported_eqv_type.inp > exported_eqv_type.out 2>&1
 
 field_names.out: field_names field_names.inp
 	$(MDB) ./field_names < field_names.inp > field_names.out 2>&1
Index: exported_eqv_type.exp
===================================================================
RCS file: /home/mercury/mercury1/repository/tests/debugger/exported_eqv_type.exp,v
retrieving revision 1.1
diff -u -b -r1.1 exported_eqv_type.exp
--- exported_eqv_type.exp	1 Apr 2004 04:34:24 -0000	1.1
+++ exported_eqv_type.exp	2 Apr 2004 05:03:01 -0000
@@ -1,4 +1,4 @@
-       1:      1  1 CALL pred exported_eqv_type.main/2-0 (det) exported_eqv_type.m:18
+      E1:     C1  1 CALL pred exported_eqv_type.main/2-0 (det) exported_eqv_type.m:18
 mdb> echo on
 Command echo enabled.
 mdb> context none
@@ -7,17 +7,17 @@
 mdb> break p
  0: + stop  interface func exported_eqv_type.p/2-0 (det)
 mdb> continue
-       2:      2  2 CALL func exported_eqv_type.p/2-0 (det)
+      E2:     C2  2 CALL func exported_eqv_type.p/2-0 (det)
 mdb> finish
-       3:      2  2 EXIT func exported_eqv_type.p/2-0 (det)
+      E3:     C2  2 EXIT func exported_eqv_type.p/2-0 (det)
 mdb> print *
        Num (arg 1)            	2
        Item (arg 2)           	55
        Dups (arg 3)           	[55, 55]
 mdb> continue
-       4:      3  2 CALL func exported_eqv_type.p/2-0 (det)
+      E4:     C3  2 CALL func exported_eqv_type.p/2-0 (det)
 mdb> finish
-       5:      3  2 EXIT func exported_eqv_type.p/2-0 (det)
+      E5:     C3  2 EXIT func exported_eqv_type.p/2-0 (det)
 mdb> print *
        Num (arg 1)            	3
        Item (arg 2)           	"a"
cvs diff: Diffing declarative
--------------------------------------------------------------------------
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
--------------------------------------------------------------------------