Regression test featuring whileadd.i.

diff --git a/.gitignore b/.gitignore
index 7b61b96465436a0accdab7bfd84a955c15e5189b..cbbf98c3adc058f8db981d304d9857207db1dab1 100644 (file)
--- 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 97126142c2db3fbe691af16f708e122cab81ae95..e58a9bdc6c103ac9ee6016e9be73c4ae170f5478 100644 (file)
--- 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 13c8e021e42311b9a288ba7860918740a2c26832..21975b25df2f4fc8d4335587d860b07e02671712 100644 (file)
--- 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 (file)
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 (file)
index 0000000..884e6e2
--- /dev/null
+++ b/pit/tests/whileadd.tst
@@ -0,0 +1,2 @@
+THREE SIX
+TWO TWO