blob: 032522300109f19c99f39576fd3f1b8748c4059e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
|
#! /bin/sh
# Copyright (C) 2010 Hironori Kitagawa <tex-live@tug.org>
# Copyright (C) 2011-2014 Peter Breitenlohner <tex-live@tug.org>
# You may freely use, modify and/or distribute this file.
testdir=$abs_srcdir/triptrap
etestdir=$abs_srcdir/etexdir/etrip
eptestdir=$abs_srcdir/eptexdir/eptrip
TEXMFCNF=$eptestdir; export TEXMFCNF
rm -rf eptripdir
mkdir eptripdir
cd eptripdir
dvitype_args="-output-level=2 -dpi=72.27 -page-start='*.*.*.*.*.*.*.*.*.*'"
echo ">>> Running e-TRIP test for e-pTeX." >&2
echo ">>> See $eptestdir/eptrip.diffs for example of acceptable diffs." >&2
# pTeX 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 e-pTeX in compatibility mode ***."
../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
../eptex --progname=epinitex --ini <$testdir/trip1.in >cptripin.fot
if test ! -s trip.fmt; then
echo "*** trip.fmt not created by trip1.in, investigate!" >&2
exit 1
fi
sed "$P_SED1" trip.log > cptripin.log || exit 1
diff $testdir/tripin.log cptripin.log
# May as well test non-ini second time through.
rm -f trip.log
../eptex --progname=eptex <$testdir/trip2.in >cptrip.fot
sed "$P_SED1;$P_SED2" trip.log > cptrip.log
diff $testdir/trip.fot cptrip.fot
# We use $DIFF instead of `diff' only for those files where there
# might actually be legitimate numerical differences.
$DIFF $DIFFFLAGS $testdir/trip.log cptrip.log
eval ../dvitype $dvitype_args trip.dvi >cptrip.typ || exit 1
$DIFF $DIFFFLAGS $testdir/trip.typ cptrip.typ
mv trip.fmt ctrip.fmt
# =================================
echo "*** TRIP test for e-pTeX in extended mode ***."
rm -f trip.log
../eptex --progname=epinitex --ini <$etestdir/etrip1.in >xptripin.fot
if test ! -s trip.fmt; then
echo "*** trip.fmt not created by etrip1.in, investigate!" >&2
exit 1
fi
sed "$P_SED1" trip.log > xptripin.log || exit 1
diff $testdir/tripin.log xptripin.log
# May as well test non-ini second time through.
rm -f trip.log
../eptex --progname=eptex <$etestdir/trip2.in >xptrip.fot
sed "$P_SED1;$P_SED2" trip.log > xptrip.log
diff $testdir/trip.fot xptrip.fot
# We use $DIFF instead of `diff' only for those files where there
# might actually be legitimate numerical differences.
$DIFF $DIFFFLAGS $testdir/trip.log xptrip.log
eval ../dvitype $dvitype_args trip.dvi >xptrip.typ || exit 1
$DIFF $DIFFFLAGS $testdir/trip.typ xptrip.typ
mv trip.fmt xtrip.fmt
# =================================
echo "*** e-TeX specific part of e-TRIP test for e-pTeX ***."
../pltotf $etestdir/etrip.pl etrip.tfm || exit 1
../tftopl ./etrip.tfm etrip.pl || exit 1
diff $etestdir/etrip.pl etrip.pl || is_OK=false
# get same filename in log
$LN_S $eptestdir/eptrip.tex etrip.tex
../eptex --progname=epinitex --ini <$etestdir/etrip2.in >eptripin.fot
if test ! -s etrip.fmt; then
echo "*** etrip.fmt not created by etrip2.in, investigate!" >&2
exit 1
fi
sed "$P_SED1" etrip.log > eptripin.log || exit 1
diff $etestdir/etripin.log eptripin.log
# May as well test non-ini second time through.
../eptex --progname=eptex <$etestdir/etrip3.in >eptrip.fot
sed "$P_SED1;$P_SED2" etrip.log > eptrip.log
diff $etestdir/etrip.fot eptrip.fot
# We use $DIFF instead of `diff' only for those files where there
# might actually be legitimate numerical differences.
$DIFF $DIFFFLAGS $eptestdir/eptrip.log eptrip.log
eval ../dvitype $dvitype_args etrip.dvi >eptrip.typ || exit 1
$DIFF $DIFFFLAGS $etestdir/etrip.typ eptrip.typ
$is_OK || {
echo ">>> There were some errors." >&2
exit 1
}
|
