texlive[46059] Build/source/texk/web2c/eptexdir: eptexdir: fix
commits+hironobu at tug.org
commits+hironobu at tug.org
Wed Dec 13 15:08:11 CET 2017
Revision: 46059
http://tug.org/svn/texlive?view=revision&revision=46059
Author: hironobu
Date: 2017-12-13 15:08:11 +0100 (Wed, 13 Dec 2017)
Log Message:
-----------
eptexdir: fix \show\odelimiter etc.
Modified Paths:
--------------
trunk/Build/source/texk/web2c/eptexdir/ChangeLog
trunk/Build/source/texk/web2c/eptexdir/fam256.ch
Modified: trunk/Build/source/texk/web2c/eptexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/ChangeLog 2017-12-13 10:59:09 UTC (rev 46058)
+++ trunk/Build/source/texk/web2c/eptexdir/ChangeLog 2017-12-13 14:08:11 UTC (rev 46059)
@@ -1,3 +1,7 @@
+2017-12-13 Hironori Kitagawa <h_kitagawa2001 at yahoo.co.jp>
+
+ * fam256.ch: \show\odelimiter should be \odelimiter, etc.
+
2017-11-30 Hironori Kitagawa <h_kitagawa2001 at yahoo.co.jp>
* pdfutils.ch: \pdfprimitive gives no error if argument is not a
Modified: trunk/Build/source/texk/web2c/eptexdir/fam256.ch
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/fam256.ch 2017-12-13 10:59:09 UTC (rev 46058)
+++ trunk/Build/source/texk/web2c/eptexdir/fam256.ch 2017-12-13 14:08:11 UTC (rev 46059)
@@ -1,5 +1,5 @@
% fam256.ch
-% (C) 2009, 2011 by Hironori Kitagawa.
+% (C) 2009--2017 by Hironori Kitagawa.
%
% This patch is derived from om16bit.ch and omfi.ch (both in Omega).
% (Omega is copyright by John Plaice and Yannis Haralambous.)
@@ -181,6 +181,28 @@
@z
%-----------------------------------------------
@x
+delim_num: print_esc("delimiter");
+ at y
+delim_num: if chr_code=0 then print_esc("delimiter")
+ else print_esc("odelimiter");
+ at z
+ at x
+math_accent: print_esc("mathaccent");
+math_char_num: print_esc("mathchar");
+ at y
+math_accent: if chr_code=0 then print_esc("mathaccent")
+ else print_esc("omathaccent");
+math_char_num: if chr_code=0 then print_esc("mathchar")
+ else print_esc("omathchar");
+ at z
+ at x
+radical: print_esc("radical");
+ at y
+radical: if chr_code=0 then print_esc("radical")
+ else print_esc("oradical");
+ at z
+%-----------------------------------------------
+ at x
@p procedure eq_word_define(@!p:pointer;@!w:integer);
label exit;
begin if eTeX_ex and(eqtb[p].int=w) then
More information about the tex-live-commits
mailing list