summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/mfluajitdir/mfluajittraptest.test
blob: ce274690c1b5d5ad87f03e28bbe953107c28f010 (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
#! /bin/sh -vx
# Copyright 2017 Karl Berry <tex-live@tug.org>
# Copyright 2015 Peter Breitenlohner <tex-live@tug.org>
# You may freely use, modify and/or distribute this file.

testdir=$abs_srcdir/triptrap
ltestdir=$abs_srcdir/mfluadir/mfluatrap
jtestdir=$abs_srcdir/mfluajitdir/mfluajittrap

TEXMFCNF=$ltestdir
LUAINPUTS=$ltestdir
export TEXMFCNF LUAINPUTS

rm -rf mfluajittrapdir
mkdir mfluajittrapdir
cd mfluajittrapdir

echo ">>> Running TRAP test for MFLuaJIT." >&2
echo ">>> See $jtestdir/mfluajittrap.diffs for example of acceptable diffs." >&2

is_OK=:

set -x

# get same filename in log
$LN_S $testdir/trap.mf .

../mfluajit --progname=inimfluajit <$testdir/mftrap1.in >mftrapin.fot
if test ! -s trap.base; then
  echo "*** trap.base not created by mftrap1.in, investigate!" >&2
  exit 1
fi
mv trap.log mftrapin.log || exit 1
diff $testdir/mftrapin.log mftrapin.log

../mfluajit --progname=inimfluajit <$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
diff $testdir/mftrap.pl mftrap.pl || is_OK=false

../gftype -m -i ./trap.72270gf >trap.typ || exit 1
diff $testdir/trap.typ trap.typ

$is_OK || {
  echo ">>> There were some errors." >&2
  exit 1
}