diff options
Diffstat (limited to 'Build/source/texk/web2c/hitexdir/tests')
-rw-r--r-- | Build/source/texk/web2c/hitexdir/tests/rule.test | 33 | ||||
-rw-r--r-- | Build/source/texk/web2c/hitexdir/tests/rule.tex | 11 |
2 files changed, 44 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/hitexdir/tests/rule.test b/Build/source/texk/web2c/hitexdir/tests/rule.test new file mode 100644 index 00000000000..24d55f53469 --- /dev/null +++ b/Build/source/texk/web2c/hitexdir/tests/rule.test @@ -0,0 +1,33 @@ +#! /bin/sh -vx +# $Id: rule.test $ +# Public domain. Originally written by Martin Ruckert +# Basic check that rule.tex can be hitexed stretched and shrinked. + +LC_ALL=C; export LC_ALL; LANGUAGE=C; export LANGUAGE + +TEXMFCNF=$srcdir/../kpathsea; export TEXMFCNF +TEXINPUTS=$srcdir/hitexdir/tests; export TEXINPUTS + +./hitex -ini --interaction=nonstopmode rule.tex || exit $? +./histretch rule.hnt || exit $? +./hishrink -o rule.out.hnt rule.HINT || exit $? +./histretch rule.out.hnt || exit $? + +if grep -q "<rule 0x48.451Ept 1pt 0x1C.73E7pt>" rule.HINT +then + : # OK +else + echo "rule.HINT does not contain the propper rule" + exit 1 +fi + +if diff -q -w rule.out.HINT rule.HINT +then + : #OK +else + echo "rule.out.HINT and rule.HINT differ" + exit 1 +fi + +exit 0 + diff --git a/Build/source/texk/web2c/hitexdir/tests/rule.tex b/Build/source/texk/web2c/hitexdir/tests/rule.tex new file mode 100644 index 00000000000..b35b0a9abca --- /dev/null +++ b/Build/source/texk/web2c/hitexdir/tests/rule.tex @@ -0,0 +1,11 @@ +% $Id: rule.tex $ +% Public domain. Test file for generating a single rule +% Originally written 2021 Martin Ruckert + +\catcode`\{=1 \catcode`\}=2 % can run under -ini + +\hrule height 1in width 1cm depth 1pt +\vfill + +\end + |