[m-rev.] diff: fix tests/tabling/specified_stats

Zoltan Somogyi zs at csse.unimelb.edu.au
Fri Jun 6 17:40:42 AEST 2008


tests/tabling/Mmakefile:
	Replace all the statistics in the output of the specified_stats test
	case with NNNs, to allow the test case to succeed even if e.g. the
	number of bytes allocated for hash tables differs on different
	platforms (e.g. 32 vs 64 bit).

Zoltan.

cvs diff: Diffing .
Index: Mmakefile
===================================================================
RCS file: /home/mercury/mercury1/repository/tests/tabling/Mmakefile,v
retrieving revision 1.52
diff -u -b -r1.52 Mmakefile
--- Mmakefile	27 Feb 2008 08:35:18 -0000	1.52
+++ Mmakefile	5 Jun 2008 00:46:17 -0000
@@ -239,6 +239,24 @@
 		mv $@.tmp $@ ; \
 	fi
 
+specified_stats.out: specified_stats
+	if ./$< > $@.tmp 2>&1; then \
+		sed     -e 's/(100.00\%)/(NNN\%)/' \
+			-e 's/ ([1-9][0-9]\.[0-9][0-9]\%)/(NNN\%)/' \
+			-e 's/  ([0-9]\.[0-9][0-9]\%)/(NNN\%)/' \
+			-e 's/[1-9][0-9],[0-9][0-9][0-9]/   NNN/' \
+			-e 's/ [1-9],[0-9][0-9][0-9]/   NNN/' \
+			-e 's/   [1-9][0-9][0-9]/   NNN/' \
+			-e 's/    [1-9][0-9]/   NNN/' \
+			-e 's/     [0-9]/   NNN/' \
+			< $@.tmp > $@; \
+		rm -f $@.tmp; \
+	else \
+		grep . $@.tmp; \
+		exit 1; \
+	fi
+
+
 .PHONY: echo_progs
 echo_progs:
 	@echo $(PROGS)
--------------------------------------------------------------------------
mercury-reviews mailing list
Post messages to:       mercury-reviews at csse.unimelb.edu.au
Administrative Queries: owner-mercury-reviews at csse.unimelb.edu.au
Subscriptions:          mercury-reviews-request at csse.unimelb.edu.au
--------------------------------------------------------------------------



More information about the reviews mailing list