diff options
Diffstat (limited to 'Build/source/texk/web2c/uptexdir/uptriptest.test')
-rwxr-xr-x | Build/source/texk/web2c/uptexdir/uptriptest.test | 59 |
1 files changed, 55 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/uptexdir/uptriptest.test b/Build/source/texk/web2c/uptexdir/uptriptest.test index 85055eb40c8..0b2af38552a 100755 --- a/Build/source/texk/web2c/uptexdir/uptriptest.test +++ b/Build/source/texk/web2c/uptexdir/uptriptest.test @@ -1,5 +1,6 @@ #! /bin/sh -vx # $Id$ +# Copyright 2023 Japanese TeX Development Community <issue@texjp.org> # Copyright 2017-2018 Karl Berry <tex-live@tug.org> # Copyright 2011-2014 Peter Breitenlohner <tex-live@tug.org> # You may freely use, modify and/or distribute this file. @@ -21,6 +22,50 @@ TEXMFCNF=$uptestdir; export TEXMFCNF rm -rf uptripdir mkdir uptripdir cd uptripdir +mkdir -p a b + +# TeX Live generic +cat >filter <<-\_EOF + s,^\*\*(\./trip\.tex ##,** \&trip trip \ + (trip.tex ##, + s/ (TeX Live 20[^)]*)// + s/ (Web2C 202[3-9])// + s/(preloaded format=.*tex)/(INITEX)/ + s/format=trip [^)][^)]*)/format=trip)/ + s/) [0-9A-Z: ]*$/)/ + s,^(\./,(, + s/[1-9][0-9]* strings out of [1-9].*/XX strings out of YYY/ + s/[1-9][0-9]* string characters out of [1-9].*/XXX string characters out of YYYY/ + s/sequences out of [1-9].*/sequences out of YYYY/ + s/[1-9] hyphenation exceptions* out of [1-9].*/X hyphenation exceptions out of YYY/ + s/[1-9][0-9]* strings of total length [1-9].*/XXXX strings of total length YYYYY/ + s/9 ops out of [1-9][0-9]*/9 ops out of YYY/ + s/TeX output ....\...\...:..../TeX output YYYY.MM.DD:hhmm/ + _EOF + +# x86 glue rounding +cat >>filter <<-\_EOF + s/ 16341\.999.*fil/ 16342.0fil/ + s/ 16238\.999.*fil/ 16239.0fil/ + s/ 16317\.999.*fil/ 16318.0fil/ + s/ 16330\.999.*fil/ 16331.0fil/ + s/ 16331\.999.*fil/ 16332.0fil/ + s/ 16343\.999.*fil/ 16344.0fil/ + s/ 9737\.587..fil/ 9737.58789fil/ + s/down4 639342.../down4 639342208/ + s/y4 2039217../y4 203921760/ + s/y0 2039217../y0 203921760/ + _EOF + +# pTeX +cat >>filter <<-\_EOF + s/This is .*TeX,/This is *TeX,/ + s/ (utf8[^)]*)/ / + s/ Version 3\.141592653-[^ ]* / Version 3.141592653/ + s/ before: [1-9][0-9][0-9][0-9]*&[1-9][0-9][0-9][0-9]*; / before: XXX\&YYY; / + s/ after: [1-9][0-9][0-9][0-9]*&[1-9][0-9][0-9][0-9]*; / after: XXX\&YYY; / + s/ still untouched: [1-9][0-9][0-9][0-9]*/ still untouched: XXX/ + _EOF dvitype_args="-output-level=2 -dpi=72.27 -page-start='*.*.*.*.*.*.*.*.*.*'" @@ -53,23 +98,29 @@ if test ! -s trip.fmt; then exit 1 fi sed "$P_SED1" trip.log > uptripin.log || exit 1 -diff $testdir/tripin.log uptripin.log +$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 +#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 +$DIFF $DIFFFLAGS $testdir/trip.log uptrip.log mv tripos.tex uptripos.tex diff $testdir/tripos.tex uptripos.tex || is_OK=false eval $_dvitype $dvitype_args trip.dvi >uptrip.typ || exit 1 -$DIFF $DIFFFLAGS $testdir/trip.typ uptrip.typ +#$DIFF $DIFFFLAGS $testdir/trip.typ uptrip.typ + +for f in trip.fot trip.typ; do + sed -f filter $testdir/$f >a/$f + sed -f filter up$f >b/$f + diff a/$f b/$f || is_OK=false +done $is_OK || { echo ">>> There were some errors." >&2 |