summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/uptexdir/newjfm.test
blob: 04b4cdb8a68cfbb5c1db2df70df5147ff68a0407 (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
#! /bin/sh -vx
# $Id$
# Copyright 2024 Japanese TeX Development Community <issue@texjp.org>
# Copyright 2018 Karl Berry <tex-live@tug.org>
# You may freely use, modify and/or distribute this file.

BinDir=${BinDir:-.}
ExeExt=${ExeExt:-}
_uppltotf=$BinDir/uppltotf$ExeExt
_uptftopl=$BinDir/uptftopl$ExeExt

test -d uptests || mkdir -p uptests

# Test inputs
testdir=$srcdir/uptexdir/tests

# Testing upPLtoTF/upTFtoPL for new JFM spec by texjporg.
for font in testnewu; do

  $_uppltotf -verbose $testdir/$font.pl uptests/x$font.tfm && \
    cmp $testdir/$font.tfm uptests/x$font.tfm && echo || exit 1

  TEXMFCNF=$srcdir/../kpathsea \
    $_uptftopl -charcode-format octal -verbose $testdir/$font.tfm uptests/x$font.pl && \
    diff $testdir/$font.pl uptests/x$font.pl && echo || exit 2

done

for font in testnewu8; do

  $_uppltotf -verbose $testdir/$font.pl uptests/x$font.tfm && \
    cmp $testdir/$font.tfm uptests/x$font.tfm && echo || exit 3

  TEXMFCNF=$srcdir/../kpathsea \
    $_uptftopl -verbose $testdir/$font.tfm uptests/x$font.pl && \
    diff $testdir/$font.pl uptests/x$font.pl && echo || exit 4

done

cmp uptests/xtestnewu.tfm uptests/xtestnewu8.tfm || exit 10

exit 0