diff options
Diffstat (limited to 'Build/source/texk/web2c/uptexdir/uptriptest')
-rwxr-xr-x | Build/source/texk/web2c/uptexdir/uptriptest | 61 |
1 files changed, 61 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/uptexdir/uptriptest b/Build/source/texk/web2c/uptexdir/uptriptest new file mode 100755 index 00000000000..e7b384cf825 --- /dev/null +++ b/Build/source/texk/web2c/uptexdir/uptriptest @@ -0,0 +1,61 @@ +#! /bin/sh + +# Copyright (C) 2011-2013 Peter Breitenlohner <tex-live@tug.org> +# You may freely use, modify and/or distribute this file. + +testdir=$abs_srcdir/triptrap +uptestdir=$abs_srcdir/uptexdir/uptrip + +TEXMFCNF=$uptestdir; export TEXMFCNF + +rm -rf uptripdir +mkdir uptripdir +cd uptripdir + +dvitype_args="-output-level=2 -dpi=72.27 -page-start='*.*.*.*.*.*.*.*.*.*'" + +echo ">>> Running TRIP test for upTeX." >&2 +echo ">>> See $uptestdir/uptrip.diffs for example of acceptable diffs." >&2 + +# upTeX outputs direction of boxes. +P_SED1='s/, yoko direction//;s/yoko direction, //' +P_SED2='s/yoko(math) direction, //' + +is_OK=: + +set -x + +echo "*** TRIP test for upTeX ***." + +../pltotf $testdir/trip.pl trip.tfm || exit 1 + +../tftopl ./trip.tfm trip.pl || exit 1 + +diff $testdir/trip.pl trip.pl || is_OK=false + +# get same filename in log +$LN_S $testdir/trip.tex . + +rm -f trip.log +../uptex --progname=upinitex --ini <$testdir/trip1.in >uptripin.fot +sed "$P_SED1" trip.log > uptripin.log || exit 1 +diff $testdir/tripin.log uptripin.log + +# May as well test non-ini second time through. +rm -f trip.log +../uptex --progname=uptex <$testdir/trip2.in >uptrip.fot +sed "$P_SED1;$P_SED2" trip.log > uptrip.log +diff $testdir/trip.fot uptrip.fot + +# We use $DIFF instead of `diff' only for those files where there +# might actually be legitimate numerical differences. +$DIFF $DIFFFLAGS $testdir/trip.log uptrip.log + +eval ../dvitype $dvitype_args trip.dvi >uptrip.typ || exit 1 +$DIFF $DIFFFLAGS $testdir/trip.typ uptrip.typ + +$is_OK || { + echo ">>> There were some errors." >&2 + exit 1 +} + |