summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/ptexdir
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2010-04-11 10:51:47 +0000
committerNorbert Preining <preining@logic.at>2010-04-11 10:51:47 +0000
commit412f83e27b51d4235fa69c5964263bdadb6b681f (patch)
tree5a5c98a9c7b0e0a7ecd731388dc951e4c544b80e /Build/source/texk/web2c/ptexdir
parent27ac36df62fb4d7f7c48fd26659067768f5e6fff (diff)
fixing building of ptex, and add ptrip.test so that build goes through
git-svn-id: svn://tug.org/texlive/trunk@17802 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/ptexdir')
-rw-r--r--Build/source/texk/web2c/ptexdir/am/ptex.am3
-rwxr-xr-xBuild/source/texk/web2c/ptexdir/ptrip.test61
2 files changed, 62 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/ptexdir/am/ptex.am b/Build/source/texk/web2c/ptexdir/am/ptex.am
index 35f492e740e..b679e0596dc 100644
--- a/Build/source/texk/web2c/ptexdir/am/ptex.am
+++ b/Build/source/texk/web2c/ptexdir/am/ptex.am
@@ -88,8 +88,7 @@ pbibtex-web2c: $(web2c_depend) web2c/cvtbib.sed pbibtex.p
pbibtex.p: tangle$(EXEEXT) pbibtex.web $(srcdir)/ptexdir/pbibtex.ch
$(tangle) pbibtex.web $(srcdir)/ptexdir/pbibtex.ch
pbibtex.web: $(srcdir)/bibtex.web
- #cat $(srcdir)/bibtex.web > $@
- cat $(srcdir)/pbibtex.web > $@
+ cat $(srcdir)/bibtex.web > $@
### pDVItype
nodist_pdvitype_SOURCES = pdvitype.c pdvitype.h
diff --git a/Build/source/texk/web2c/ptexdir/ptrip.test b/Build/source/texk/web2c/ptexdir/ptrip.test
new file mode 100755
index 00000000000..d9a39d190f4
--- /dev/null
+++ b/Build/source/texk/web2c/ptexdir/ptrip.test
@@ -0,0 +1,61 @@
+#! /bin/sh
+
+# Copyright (C) 2009 Peter Breitenlohner <tex-live@tug.org>
+# You may freely use, modify and/or distribute this file.
+
+testdir=$srcdir/triptrap
+# ptestdir=$srcdir/ptexdir/ptrip
+
+TEXMFCNF=$testdir; export TEXMFCNF
+
+dvitype_args="-output-level=2 -dpi=72.27 -page-start='*.*.*.*.*.*.*.*.*.*'"
+
+echo ">>> Running TRIP test for pTeX." >&2
+#echo ">>> See $etestdir/etrip.diffs for example of acceptable diffs." >&2
+
+rm -f trip.tfm trip.pl trip.tex trip.fmt trip.dvi \
+ ctripin.fot ctripin.log ctrip.fot ctrip.log ctrip.typ \
+ xtripin.fot xtripin.log xtrip.fot xtrip.log xtrip.typ \
+ etrip.tfm etrip.pl etrip.tex etrip.fmt etrip.dvi \
+ etripin.fot etripin.log etrip.fot etrip.log etrip.out etrip.typ \
+ tripos.tex 8terminal.tex
+rm -rf tfm
+
+is_OK=:
+
+set -x
+
+echo "*** TRIP test for pTeX ***."
+
+./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 .
+
+./ptex --progname=einitex --ini <$testdir/trip1.in >ctripin.fot
+mv trip.log ctripin.log || exit 1
+diff $testdir/tripin.log ctripin.log
+
+# May as well test non-ini second time through.
+./ptex --progname=etex <$testdir/trip2.in >ctrip.fot
+# pTeX outputs direction of boxes.
+cat trip.log | sed "s/, yoko direction//" | sed "s/yoko direction, //" > ctrip.log
+diff $testdir/trip.fot ctrip.fot
+
+# We use $DIFF instead of `diff' only for those files where there
+# might actually be legitimate numerical differences.
+$DIFF $DIFFFLAGS $testdir/trip.log ctrip.log
+
+eval ./dvitype $dvitype_args trip.dvi >ctrip.typ || exit 1
+$DIFF $DIFFFLAGS $testdir/trip.typ ctrip.typ
+
+$is_OK || {
+ echo ">>> There were some errors." >&2
+ exit 1
+}
+
+# pTeX doesn't support extended mode.