texlive[68304] Build/source/texk/web2c: web2c: Make easier to test on
commits+takuji at tug.org
commits+takuji at tug.org
Sun Sep 17 11:06:30 CEST 2023
Revision: 68304
https://tug.org/svn/texlive?view=revision&revision=68304
Author: takuji
Date: 2023-09-17 11:06:29 +0200 (Sun, 17 Sep 2023)
Log Message:
-----------
web2c: Make easier to test on Windows
Modified Paths:
--------------
trunk/Build/source/texk/web2c/ChangeLog
trunk/Build/source/texk/web2c/etexdir/ChangeLog
trunk/Build/source/texk/web2c/etexdir/etriptest.test
trunk/Build/source/texk/web2c/etexdir/wprob.test
trunk/Build/source/texk/web2c/mftraptest.test
trunk/Build/source/texk/web2c/mplibdir/ChangeLog
trunk/Build/source/texk/web2c/mplibdir/mptraptest.test
trunk/Build/source/texk/web2c/triptest.test
trunk/Build/source/texk/web2c/twill.test
Modified: trunk/Build/source/texk/web2c/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/ChangeLog 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/ChangeLog 2023-09-17 09:06:29 UTC (rev 68304)
@@ -1,3 +1,8 @@
+2023-09-17 TANAKA Takuji <ttk at t-lab.opal.ne.jp>
+
+ * {mftraptest,triptest,twill}.test:
+ Make easier to test on Windows.
+
2023-09-04 Andreas Scherer <https://ascherer.github.io>
* tangle.ch: Fix typo as in weave.web.
Modified: trunk/Build/source/texk/web2c/etexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/etexdir/ChangeLog 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/etexdir/ChangeLog 2023-09-17 09:06:29 UTC (rev 68304)
@@ -1,3 +1,8 @@
+2023-09-17 TANAKA Takuji <ttk at t-lab.opal.ne.jp>
+
+ * {etriptest,wprob}.test:
+ Make easier to test on Windows.
+
2023-03-09 Karl Berry <karl at tug.org>
* TL'23 release.
Modified: trunk/Build/source/texk/web2c/etexdir/etriptest.test
===================================================================
--- trunk/Build/source/texk/web2c/etexdir/etriptest.test 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/etexdir/etriptest.test 2023-09-17 09:06:29 UTC (rev 68304)
@@ -4,6 +4,13 @@
# Copyright 2009-2014 Peter Breitenlohner <tex-live at tug.org>
# You may freely use, modify and/or distribute this file.
+W2CDir=${W2CDir:-..}
+ExeExt=${ExeExt:-}
+_etex=$W2CDir/etex$ExeExt
+_pltotf=$W2CDir/pltotf$ExeExt
+_tftopl=$W2CDir/tftopl$ExeExt
+_dvitype=$W2CDir/dvitype$ExeExt
+
testdir=$abs_srcdir/triptrap
etestdir=$abs_srcdir/etexdir/etrip
@@ -24,9 +31,9 @@
echo "*** TRIP test for e-TeX in compatibility mode ***."
-../pltotf $testdir/trip.pl trip.tfm || exit 1
+$_pltotf $testdir/trip.pl trip.tfm || exit 1
-../tftopl ./trip.tfm trip.pl || exit 1
+$_tftopl ./trip.tfm trip.pl || exit 1
diff $testdir/trip.pl trip.pl || is_OK=false
@@ -33,7 +40,7 @@
# get same filename in log
$LN_S $testdir/trip.tex .
-../etex --progname=einitex --ini <$testdir/trip1.in >ctripin.fot
+$_etex --progname=einitex --ini <$testdir/trip1.in >ctripin.fot
if test ! -s trip.fmt; then
echo "*** trip.fmt not created by trip1.in, investigate!" >&2
exit 1
@@ -42,7 +49,7 @@
diff $testdir/tripin.log ctripin.log
# May as well test non-ini second time through.
-../etex --progname=etex <$testdir/trip2.in >ctrip.fot
+$_etex --progname=etex <$testdir/trip2.in >ctrip.fot
mv trip.log ctrip.log
diff $testdir/trip.fot ctrip.fot
@@ -53,7 +60,7 @@
mv tripos.tex ctripos.tex
diff $testdir/tripos.tex ctripos.tex
-eval ../dvitype $dvitype_args trip.dvi >ctrip.typ || exit 1
+eval $_dvitype $dvitype_args trip.dvi >ctrip.typ || exit 1
$DIFF $DIFFFLAGS $testdir/trip.typ ctrip.typ
mv trip.fmt ctrip.fmt
@@ -62,7 +69,7 @@
echo "*** TRIP test for e-TeX in extended mode ***."
-../etex --progname=einitex --ini <$etestdir/etrip1.in >xtripin.fot
+$_etex --progname=einitex --ini <$etestdir/etrip1.in >xtripin.fot
if test ! -s trip.fmt; then
echo "*** trip.fmt not created by etrip1.in, investigate!" >&2
exit 1
@@ -71,7 +78,7 @@
diff ctripin.log xtripin.log
# May as well test non-ini second time through.
-../etex --progname=etex <$etestdir/trip2.in >xtrip.fot
+$_etex --progname=etex <$etestdir/trip2.in >xtrip.fot
mv trip.log xtrip.log
diff ctrip.fot xtrip.fot
@@ -82,7 +89,7 @@
mv tripos.tex xtripos.tex
diff $testdir/tripos.tex xtripos.tex
-eval ../dvitype $dvitype_args trip.dvi >xtrip.typ || exit 1
+eval $_dvitype $dvitype_args trip.dvi >xtrip.typ || exit 1
$DIFF $DIFFFLAGS ctrip.typ xtrip.typ
mv trip.fmt xtrip.fmt
@@ -91,9 +98,9 @@
echo "*** e-TeX specific part of e-TRIP test ***."
-../pltotf $etestdir/etrip.pl etrip.tfm || exit 1
+$_pltotf $etestdir/etrip.pl etrip.tfm || exit 1
-../tftopl ./etrip.tfm etrip.pl || exit 1
+$_tftopl ./etrip.tfm etrip.pl || exit 1
diff $etestdir/etrip.pl etrip.pl || is_OK=false
@@ -100,7 +107,7 @@
# get same filename in log
$LN_S $etestdir/etrip.tex .
-../etex --progname=einitex --ini <$etestdir/etrip2.in >etripin.fot
+$_etex --progname=einitex --ini <$etestdir/etrip2.in >etripin.fot
if test ! -s etrip.fmt; then
echo "*** etrip.fmt not created by etrip2.in, investigate!" >&2
exit 1
@@ -109,7 +116,7 @@
diff $etestdir/etripin.log etripin.log
# May as well test non-ini second time through.
-../etex --progname=etex <$etestdir/etrip3.in >etrip.fot
+$_etex --progname=etex <$etestdir/etrip3.in >etrip.fot
diff $etestdir/etrip.fot etrip.fot
# We use $DIFF instead of `diff' only for those files where there
@@ -118,7 +125,7 @@
diff $etestdir/etrip.out etrip.out
-eval ../dvitype $dvitype_args etrip.dvi >etrip.typ || exit 1
+eval $_dvitype $dvitype_args etrip.dvi >etrip.typ || exit 1
$DIFF $DIFFFLAGS $etestdir/etrip.typ etrip.typ
$is_OK || {
Modified: trunk/Build/source/texk/web2c/etexdir/wprob.test
===================================================================
--- trunk/Build/source/texk/web2c/etexdir/wprob.test 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/etexdir/wprob.test 2023-09-17 09:06:29 UTC (rev 68304)
@@ -4,12 +4,17 @@
# Copyright 2011-2013 Peter Breitenlohner <tex-live at tug.org>
# You may freely use, modify and/or distribute this file.
+BinDir=${BinDir:-.}
+ExeExt=${ExeExt:-}
+_etex=$BinDir/etex$ExeExt
+
rm -rf ewprob.*
cp $srcdir/tests/wprob.tex ./ewprob.tex
TEXMFCNF=$srcdir/../kpathsea \
- ./etex --ini --etex --file-line-error --interaction=nonstopmode ewprob.tex
+ $_etex --ini --etex --file-line-error --interaction=nonstopmode ewprob.tex
grep '^\./ewprob\.tex:12: Could not open file NoSuchFile\.eps\.$' \
ewprob.log || exit 1
+exit 0
Modified: trunk/Build/source/texk/web2c/mftraptest.test
===================================================================
--- trunk/Build/source/texk/web2c/mftraptest.test 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/mftraptest.test 2023-09-17 09:06:29 UTC (rev 68304)
@@ -4,6 +4,12 @@
# Copyright 2009-2014 Peter Breitenlohner <tex-live at tug.org>
# You may freely use, modify and/or distribute this file.
+W2CDir=${W2CDir:-..}
+ExeExt=${ExeExt:-}
+_mf=$W2CDir/mf$ExeExt
+_tftopl=$W2CDir/tftopl$ExeExt
+_gftype=$W2CDir/gftype$ExeExt
+
# pre-generated test results in the repository are stored in LF
# but the output might be written in CRLF on some platform.
# if 'diff --strip-trailing-cr' is available, exploit it.
@@ -62,7 +68,7 @@
$LN_S $testdir/trap.mf . || exit 1
rm -f trap.base
-../mf --progname=inimf <$testdir/mftrap1.in >mftrapin.fot
+$_mf --progname=inimf <$testdir/mftrap1.in >mftrapin.fot
if test ! -s trap.base; then
echo "*** trap.base not created by mftrap1.in, investigate!" >&2
exit 1
@@ -70,16 +76,16 @@
mv trap.log mftrapin.log || exit 1
diff $testdir/mftrapin.log mftrapin.log
-../mf --progname=inimf <$testdir/mftrap2.in >mftrap.fot
+$_mf --progname=inimf <$testdir/mftrap2.in >mftrap.fot
mv trap.log mftrap.log || exit 1
mv trap.tfm mftrap.tfm || exit 1
diff $testdir/mftrap.fot mftrap.fot
diff $testdir/mftrap.log mftrap.log
-../tftopl ./mftrap.tfm mftrap.pl || exit 1
+$_tftopl ./mftrap.tfm mftrap.pl || exit 1
diff $testdir/mftrap.pl mftrap.pl || is_OK=false
-../gftype -m -i ./trap.72270gf >trap.typ || exit 1
+$_gftype -m -i ./trap.72270gf >trap.typ || exit 1
$DIFF $testdir/trap.typ trap.typ
for f in mftrapin.log mftrap.fot mftrap.log trap.typ; do
Modified: trunk/Build/source/texk/web2c/mplibdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/mplibdir/ChangeLog 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/mplibdir/ChangeLog 2023-09-17 09:06:29 UTC (rev 68304)
@@ -1,3 +1,8 @@
+2023-09-17 TANAKA Takuji <ttk at t-lab.opal.ne.jp>
+
+ * mptraptest.test:
+ Make easier to test on Windows.
+
2023-09-16 TANAKA Takuji <ttk at t-lab.opal.ne.jp>
* mp.w: Fixed a buffer overflow.
Modified: trunk/Build/source/texk/web2c/mplibdir/mptraptest.test
===================================================================
--- trunk/Build/source/texk/web2c/mplibdir/mptraptest.test 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/mplibdir/mptraptest.test 2023-09-17 09:06:29 UTC (rev 68304)
@@ -6,6 +6,14 @@
_mpost=$BinDir/mpost$ExeExt
_pltotf=$BinDir/pltotf$ExeExt
+# pre-generated test results in the repository are stored in LF
+# but the output might be written in CRLF on some platform.
+# if 'diff --strip-trailing-cr' is available, exploit it.
+# (useful for tests on win32 binaries run on MSYS shell)
+DIFF="diff"
+$DIFF --strip-trailing-cr $0 $0 \
+ && DIFF="diff --strip-trailing-cr" || echo
+
testdir=$abs_srcdir/triptrap
TEXMFCNF=$testdir; export TEXMFCNF
@@ -28,10 +36,10 @@
$_mpost --ini mtrap
diff $testdir/mtrap.log mtrap.log
-diff $testdir/mtrap.0 mtrap.0
-diff $testdir/mtrap.1 mtrap.1
-diff $testdir/writeo writeo
-diff $testdir/writeo.2 writeo.2
+$DIFF $testdir/mtrap.0 mtrap.0
+$DIFF $testdir/mtrap.1 mtrap.1
+$DIFF $testdir/writeo writeo
+$DIFF $testdir/writeo.2 writeo.2
$LN_S $testdir/trap.mp . || exit 1
$LN_S $testdir/trap.mpx . || exit 1
Modified: trunk/Build/source/texk/web2c/triptest.test
===================================================================
--- trunk/Build/source/texk/web2c/triptest.test 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/triptest.test 2023-09-17 09:06:29 UTC (rev 68304)
@@ -4,6 +4,13 @@
# Copyright 2009-2014 Peter Breitenlohner <tex-live at tug.org>
# You may freely use, modify and/or distribute this file.
+W2CDir=${W2CDir:-..}
+ExeExt=${ExeExt:-}
+_tex=$W2CDir/tex$ExeExt
+_pltotf=$W2CDir/pltotf$ExeExt
+_tftopl=$W2CDir/tftopl$ExeExt
+_dvitype=$W2CDir/dvitype$ExeExt
+
LC_ALL=C; export LC_ALL; LANGUAGE=C; export LANGUAGE
testdir=$abs_srcdir/triptrap
@@ -58,9 +65,9 @@
set -x
-../pltotf $testdir/trip.pl trip.tfm || exit 1
+$_pltotf $testdir/trip.pl trip.tfm || exit 1
-../tftopl ./trip.tfm trip.pl || exit 1
+$_tftopl ./trip.tfm trip.pl || exit 1
diff $testdir/trip.pl trip.pl || is_OK=false
@@ -69,7 +76,7 @@
$LN_S $testdir/trip.tex . || exit 1
rm -f trip.fmt
-../tex --progname=initex --ini <$testdir/trip1.in >tripin.fot
+$_tex --progname=initex --ini <$testdir/trip1.in >tripin.fot
if test ! -s trip.fmt; then
echo "*** trip.fmt not created by trip1.in, investigate!" >&2
exit 1
@@ -78,7 +85,7 @@
diff $testdir/tripin.log tripin.log
# May as well test non-ini second time through.
-../tex --progname=tex <$testdir/trip2.in >trip.fot
+$_tex --progname=tex <$testdir/trip2.in >trip.fot
diff $testdir/trip.fot trip.fot
# We use $DIFF instead of `diff' only for those files where there
@@ -87,7 +94,7 @@
diff $testdir/tripos.tex tripos.tex || is_OK=false
-eval ../dvitype $dvitype_args trip.dvi >trip.typ || exit 1
+eval $_dvitype $dvitype_args trip.dvi >trip.typ || exit 1
$DIFF $DIFFFLAGS $testdir/trip.typ trip.typ
for f in tripin.log trip.fot trip.log trip.typ; do
Modified: trunk/Build/source/texk/web2c/twill.test
===================================================================
--- trunk/Build/source/texk/web2c/twill.test 2023-09-16 23:50:25 UTC (rev 68303)
+++ trunk/Build/source/texk/web2c/twill.test 2023-09-17 09:06:29 UTC (rev 68304)
@@ -5,8 +5,12 @@
# Copyright 2009 Peter Breitenlohner <tex-live at tug.org>
# You may freely use, modify and/or distribute this file.
+BinDir=${BinDir:-.}
+ExeExt=${ExeExt:-}
+_twill=$BinDir/twill$ExeExt
+
test -d tests || mkdir -p tests
TEXMFCNF=$srcdir/../kpathsea WEBINPUTS=$srcdir \
- ./twill pooltype || exit 1
+ $_twill pooltype || exit 1
More information about the tex-live-commits
mailing list.