From: Eric S. Raymond <esr@thyrsus.com>
Date: Sat, 28 Aug 2010 15:20:20 +0000 (-0400)
Subject: Regression test featuring whileadd.i.
X-Git-Tag: 0.29~87
X-Git-Url: http://thyrsus.com/gitweb/?a=commitdiff_plain;h=9be6cf7397fe2a58066155252dc546188705c37e;p=intercal.git

Regression test featuring whileadd.i.
---

diff --git a/.gitignore b/.gitignore
index 7b61b96..cbbf98c 100644
--- a/.gitignore
+++ b/.gitignore
@@ -85,6 +85,7 @@ pit/tests/testonce
 pit/tests/testops3
 pit/tests/testops5
 pit/tests/testsplat
+pit/tests/whileadd
 pit/tpk
 pit/unlambda
 pit/yapp
diff --git a/pit/CATALOG b/pit/CATALOG
index 9712614..e58a9bd 100644
--- a/pit/CATALOG
+++ b/pit/CATALOG
@@ -12,14 +12,14 @@ programs; the programs in explib are expansion libraries written in C,
 which serve as examples of the C-INTERCAL to C interface as well as
 potentially being useful.
 
-Programs marked with + have associated .chk files and are part of the
-regression-test suite.
+Programs marked with + have associated .chk files (and, if they take
+input, corresponding .tst files) and are part of the regression-test
+suite.
 
 Contents:
 
 from original manual:
   sample.i		Returns absolute value of a 16-bit 2s-complement number
-  lib/syslib.i		Standard library, with bugs fixed
   lib/syslib-orig.i	Standard library (original buggy version)
 
 by Jon Blow <jon@sampo.com>
@@ -127,7 +127,7 @@ by Alex Smith
   tests/arrtest.doc	The history behind those changes
   tests/permute.i	+ A permutation-printing program to test backtracking
   tests/permute.doc	Information about the permutation-printer
-  tests/whileadd.i	Adds two input numbers with a single WHILE statement
+  tests/whileadd.i	+ Adds two input numbers with a single WHILE statement
   tests/ignorret.i	Testing interactions of IGNORE and RETRIEVE
   tests/ignorret.doc	What ignorret does on several compilers
   tests/normaldist.i	Checking the standard deviation of (1910)
diff --git a/pit/Makefile b/pit/Makefile
index 13c8e02..21975b2 100644
--- a/pit/Makefile
+++ b/pit/Makefile
@@ -52,6 +52,7 @@ BASE2SOURCES = \
 	./tests/testlib2.i \
 	./tests/testonce \
 	./tests/testsplat.i \
+	./tests/whileadd.i \
 	./tpk.i \
 	./unlambda.i \
 	./yapp.i
@@ -114,14 +115,17 @@ test: $(TARGETS)
 	@./tests/test1 2>&1 | ./regresscheck tests/test1 
 	@cat tests/test2.tst | ./tests/test2 | ./regresscheck tests/test2
 	@./tests/testonce | ./regresscheck tests/testonce 
+	@cat tests/whileadd.tst | ./tests/whileadd | ./regresscheck tests/whileadd
 	@echo "Tests complete."
 
 
 # Needs special handling because the -m option is required
-tests/permute: tests/permute.i
-	$(ICK) -m tests/permute.i
 fft: fft.i
 	$(ICK) -m fft.i
+tests/permute: tests/permute.i
+	$(ICK) -m tests/permute.i
+tests/whileadd: tests/whileadd.i
+	$(ICK) -m tests/whileadd.i
 
 lines:
 	wc -l $(SOURCES)
diff --git a/pit/tests/whileadd.chk b/pit/tests/whileadd.chk
new file mode 100644
index 0000000..68e119a
--- /dev/null
+++ b/pit/tests/whileadd.chk
@@ -0,0 +1,2 @@
+     
+LVIII
diff --git a/pit/tests/whileadd.tst b/pit/tests/whileadd.tst
new file mode 100644
index 0000000..884e6e2
--- /dev/null
+++ b/pit/tests/whileadd.tst
@@ -0,0 +1,2 @@
+THREE SIX
+TWO TWO