summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/eptexdir
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2011-03-29 16:04:29 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2011-03-29 16:04:29 +0000
commit2c5a772c871ee51297bea7fc6dcea9c80abe387e (patch)
tree13029490fb1460f7649c336cf9e640ac8a3a087d /Build/source/texk/web2c/eptexdir
parent4f0e2599e6819a91ce36143e1f4b272025400949 (diff)
e-TeX, pTeX, and e-pTeX: redefine box_lr and box_dir
to also work for min_quarterword<0 git-svn-id: svn://tug.org/texlive/trunk@21877 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/eptexdir')
-rw-r--r--Build/source/texk/web2c/eptexdir/ChangeLog.TL5
-rw-r--r--Build/source/texk/web2c/eptexdir/eptex.ech23
-rw-r--r--Build/source/texk/web2c/eptexdir/etex.ch06
-rw-r--r--Build/source/texk/web2c/eptexdir/fam256.ch4
4 files changed, 27 insertions, 11 deletions
diff --git a/Build/source/texk/web2c/eptexdir/ChangeLog.TL b/Build/source/texk/web2c/eptexdir/ChangeLog.TL
index 4e8fa9fdfc4..0ac11892964 100644
--- a/Build/source/texk/web2c/eptexdir/ChangeLog.TL
+++ b/Build/source/texk/web2c/eptexdir/ChangeLog.TL
@@ -1,6 +1,11 @@
ChangeLog.TL: TeX Live (TL) changes for e-pTeX
==============================================
+2011-03-29 Peter Breitenlohner <peb@mppmu.mpg.de>
+
+ * eptex.ech, etex.ch0: Redefine box_dir and box_lr to also work
+ for min_quarterword<0.
+
2011-03-28 Peter Breitenlohner <peb@mppmu.mpg.de>
* am/eptex.am: Use AM_CFLAGS instead of eptex_CFLAGS.
diff --git a/Build/source/texk/web2c/eptexdir/eptex.ech b/Build/source/texk/web2c/eptexdir/eptex.ech
index 49d80ac2d75..3e381fae846 100644
--- a/Build/source/texk/web2c/eptexdir/eptex.ech
+++ b/Build/source/texk/web2c/eptexdir/eptex.ech
@@ -31,12 +31,19 @@
@d max_quarterword=@"FFFF {largest allowable value in a |quarterword|}
@z
+@x [10.135] l.2895 - e-pTeX: box_lr and box_dir
+In \eTeX\ the |subtype| field records the box direction mode |box_lr|.
+@y
+In \eTeX\ the |subtype| field records the box direction mode |box_lr|.
+In \epTeX\ the |subtype| field is |qi(8*box_lr+box_dir)|.
+@z
+
@x
-@d box_dir(#) == subtype(#) {direction mode of a box}
+@d box_dir(#) == (qo(subtype(#))) {direction of a box}
@d set_box_dir(#) == subtype(#):=set_box_dir_end
@y
-@d box_dir(#) == (subtype(#)mod 8) {direction mode of a box}
-@d set_box_dir(#) == subtype(#):=(subtype(#)div 8)*8+set_box_dir_end
+@d box_dir(#) == ((qo(subtype(#)))mod 8) {direction of a box}
+@d set_box_dir(#) == subtype(#):=box_lr(#)*8+set_box_dir_end
@z
@x [26.413] l.8343 - e-pTeX: scan_something_internal
@@ -93,13 +100,11 @@ if not is_char_node(tx) then
@z
@x
-@d box_lrstat(#) == subtype(#) {direction mode of a box}
-@d set_box_lrstat(#) == subtype(#):=set_box_lrstat_end
-@d set_box_lrstat_end(#) == #
+@d box_lr(#) == (qo(subtype(#))) {direction mode of a box}
+@d set_box_lr(#) == subtype(#):=set_box_lr_end
@y
-@d box_lrstat(#) == (subtype(#)div 8) {direction mode of a box}
-@d set_box_lrstat(#) == subtype(#):=(subtype(#)mod 8)+8*set_box_lrstat_end
-@d set_box_lrstat_end(#) == (#)
+@d box_lr(#) == ((qo(subtype(#)))div 8) {direction mode of a box}
+@d set_box_lr(#) == subtype(#):=box_dir(#)+8*set_box_lr_end
@z
@x [45.996] l.19420
diff --git a/Build/source/texk/web2c/eptexdir/etex.ch0 b/Build/source/texk/web2c/eptexdir/etex.ch0
index cb2f8795e87..1fb7c8c68ee 100644
--- a/Build/source/texk/web2c/eptexdir/etex.ch0
+++ b/Build/source/texk/web2c/eptexdir/etex.ch0
@@ -1,6 +1,12 @@
% eptexdir/etex.ch0: changefile used to build e-pTeX, see eptexdir/eptex-base.ch for details.
% Public domain. Originally written by Peter Breitenlohner <tex-live@tug.org>.
+@x [10] m.135 l.2895 - e-TeX TeXXeT
+|fil|, |fill|, or |filll|). The |subtype| field is not used in \TeX.
+@y
+|fil|, |fill|, or |filll|). The |subtype| field is not used.
+@z
+
@x [17.236] l.4960 - first web2c, then e-TeX additional integer parameters
@d int_pars=web2c_int_pars {total number of integer parameters}
@#
diff --git a/Build/source/texk/web2c/eptexdir/fam256.ch b/Build/source/texk/web2c/eptexdir/fam256.ch
index e4d988d236f..dc759b93812 100644
--- a/Build/source/texk/web2c/eptexdir/fam256.ch
+++ b/Build/source/texk/web2c/eptexdir/fam256.ch
@@ -25,10 +25,10 @@
%-----------------------------------------------
@x
specifies the order of infinity to which glue setting applies (|normal|,
-|fil|, |fill|, or |filll|). The |subtype| field is not used.
+|fil|, |fill|, or |filll|). The |subtype| field is not used in \TeX.
@y
specifies the order of infinity to which glue setting applies (|normal|,
-|sfi|, |fil|, |fill|, or |filll|). The |subtype| field is not used.
+|sfi|, |fil|, |fill|, or |filll|). The |subtype| field is not used in \TeX.
@z
%-----------------------------------------------
@x