texlive[45141] Master/texmf-dist: uplatex (27aug17)
commits+karl at tug.org
commits+karl at tug.org
Mon Aug 28 01:51:50 CEST 2017
Revision: 45141
http://tug.org/svn/texlive?view=revision&revision=45141
Author: karl
Date: 2017-08-28 01:51:50 +0200 (Mon, 28 Aug 2017)
Log Message:
-----------
uplatex (27aug17)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/uplatex/base/README.md
trunk/Master/texmf-dist/doc/uplatex/base/upldoc.pdf
trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx
trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx
trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx
trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx
trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex
trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx
trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx
trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty
Modified: trunk/Master/texmf-dist/doc/uplatex/base/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/uplatex/base/README.md 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/doc/uplatex/base/README.md 2017-08-27 23:51:50 UTC (rev 45141)
@@ -17,6 +17,6 @@
## Release Date
-2017-07-29
+2017-08-27
Japanese TeX Development Community
Modified: trunk/Master/texmf-dist/doc/uplatex/base/upldoc.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/source/uplatex/base/plcore.dtx 2017-08-27 23:51:50 UTC (rev 45141)
@@ -68,6 +68,8 @@
% \changes{v1.2n}{2017/04/23}{$B%I%-%e%a%s%H$NDI2C(B}
% \changes{v1.2o}{2017/05/03}{$B9TF,6XB'J8;z$ND>A0$G$b2~9T$9$k$h$&$K$7$?(B}
% \changes{v1.2p}{2017/07/21}{tabular$B4D6-$N%;%kFb$N(BJFM$B%0%k!=$r:o=|(B}
+% \changes{v1.2q}{2017/08/25}{\cs{nolinebreak}$B$N>l9g$K(B\cs{(x)kanjiskip}$B$,(B
+% $BF~$i$J$/$J$C$F$$$?$N$r=$@5(B}
% \fi
%
% \iffalse
@@ -74,7 +76,7 @@
%<*driver>
\NeedsTeXFormat{pLaTeX2e}
% \fi
-\ProvidesFile{plcore.dtx}[2017/07/21 v1.2p pLaTeX core file]
+\ProvidesFile{plcore.dtx}[2017/08/25 v1.2q pLaTeX core file]
% \iffalse
\documentclass{jltxdoc}
\GetFileInfo{plcore.dtx}
@@ -269,8 +271,15 @@
% $B9TJ,3d$,5/$-$?>l9g!"?7$7$$9TF,$N(BJFM$B%0%k!=$O>C$($k$H$$$&=>Mh$N(B
% p\LaTeX{}$B$N5sF0$b0];}$7$F$$$^$9!#(B
% \changes{v1.2o}{2017/05/03}{$B9TF,6XB'J8;z$ND>A0$G$b2~9T$9$k$h$&$K$7$?(B}
+%
+% $BA02s$N(B|\hskip\z@\relax|$B$NDI2C$G$O!"(B|\nolinebreak|$B$N>l9g$K(B|\kanjiskip|$B$d(B
+% |\xkanjiskip|$B$,F~$i$J$$LdBj$,5/$-$F$7$^$$$^$7$?!#$=$3$G!"(B
+% |\penalty\z@\relax|$B$KJQ99$7$^$7$?!#$3$l$O!"L@<(E*$J(B|\penalty|$B%W%j%_%F%#%V(B
+% $BF1;N$N9g;;$O9T$o$l$J$$$3$H$rMxMQ$7$F$$$^$9!#(B
+% \changes{v1.2q}{2017/08/25}{\cs{nolinebreak}$B$N>l9g$K(B\cs{(x)kanjiskip}$B$,(B
+% $BF~$i$J$/$J$C$F$$$?$N$r=$@5(B}
% \begin{macrocode}
-%<platexrelease>\plIncludeInRelease{2017/05/05}{\@no at lnbk}
+%<platexrelease>\plIncludeInRelease{2017/07/29}{\@no at lnbk}
%<platexrelease> {Break before prebreakpenalty}%
%<*plcore|platexrelease>
\def\@no at lnbk #1[#2]{%
@@ -280,7 +289,7 @@
\@tempskipa\lastskip
\unskip
\penalty #1\@getpen{#2}%
- \hskip\z@\relax %% added (2017/05/03)
+ \penalty\z@\relax %% added (2017/08/25)
\ifdim\@tempskipa>\z@
\hskip\@tempskipa
\ignorespaces
@@ -288,6 +297,22 @@
\fi}
%</plcore|platexrelease>
%<platexrelease>\plEndIncludeInRelease
+%<platexrelease>\plIncludeInRelease{2017/05/05}{\@no at lnbk}
+%<platexrelease> {Break before prebreakpenalty}%
+%<platexrelease>\def\@no at lnbk #1[#2]{%
+%<platexrelease> \ifvmode
+%<platexrelease> \@nolnerr
+%<platexrelease> \else
+%<platexrelease> \@tempskipa\lastskip
+%<platexrelease> \unskip
+%<platexrelease> \penalty #1\@getpen{#2}%
+%<platexrelease> \hskip\z@\relax %% added (2017/05/03)
+%<platexrelease> \ifdim\@tempskipa>\z@
+%<platexrelease> \hskip\@tempskipa
+%<platexrelease> \ignorespaces
+%<platexrelease> \fi
+%<platexrelease> \fi}
+%<platexrelease>\plEndIncludeInRelease
%<platexrelease>\plIncludeInRelease{0000/00/00}{\@no at lnbk}
%<platexrelease> {Break before prebreakpenalty}%
%<platexrelease>\def\@no at lnbk #1[#2]{%
Modified: trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx 2017-08-27 23:51:50 UTC (rev 45141)
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016 Japanese TeX Development Community
+% Copyright (c) 2016-2017 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------
@@ -19,10 +19,19 @@
% \StopEventually{}
%
% \iffalse
+% \changes{v1.0-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。}
+% \changes{v1.0-u01}{2017/08/02}{U+00B7 (MIDDLE DOT; JIS X 0213)の
+% 前禁則ペナルティをU+30FBと同じ値に設定、注意点を明文化}
+% \changes{v1.0b}{2017/08/05}{％、＆、\%、\&の禁則ペナルティが
+% 誤っていたのを修正（post $\rightarrow$ pre）}
+% \changes{v1.0b-u01}{2017/08/05}{p\LaTeX{}の変更に追随}
+% \fi
+%
+% \iffalse
%<*driver>
\NeedsTeXFormat{pLaTeX2e}
% \fi
-\ProvidesFile{ukinsoku.dtx}[2011/05/07 v1.0-u00 upLaTeX Kernel]
+\ProvidesFile{ukinsoku.dtx}[2017/08/05 v1.0b-u01 upLaTeX Kernel]
% \iffalse
\documentclass{jltxdoc}
\GetFileInfo{ukinsoku.dtx}
@@ -41,7 +50,9 @@
% 参照してください。
%
% なお、このファイルのコード部分は、
-% 以前のバージョンで配布された\file{ukinsoku.tex}と同一です。
+% p\TeX{}やp\LaTeX{}で配布されている\file{kinsoku.tex}に、
+% JIS X 0213の定義文字などの設定を追加したものです。
+% \changes{v1.0-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。}
%
% \begin{macrocode}
%<*plcore>
@@ -55,6 +66,8 @@
%
% \subsection{半角文字に対する禁則}
% ここでは、半角文字に対する禁則の設定を行なっています。
+% \changes{v1.0b}{2017/08/05}{％、＆、\%、\&の禁則ペナルティが
+% 誤っていたのを修正（post $\rightarrow$ pre）}
%
% \begin{macrocode}
%%
@@ -65,8 +78,8 @@
\prebreakpenalty`"=10000
\postbreakpenalty`\#=500
\postbreakpenalty`\$=500
-\postbreakpenalty`\%=500
-\postbreakpenalty`\&=500
+\prebreakpenalty`\%=500
+\prebreakpenalty`\&=500
\postbreakpenalty`\`=10000
\prebreakpenalty`'=10000
\prebreakpenalty`)=10000
@@ -87,6 +100,29 @@
% \subsection{全角文字に対する禁則}
% ここでは、全角文字に対する禁則の設定を行なっています。
%
+% up\TeX{}/up\LaTeX{}の場合、JIS X 0213（日本）・KS C 5601（韓国）・
+% GB2312（中国）・Big5（台湾）などの文字集合に含まれる、
+% いわゆる全角文字の一部が、8-bit Latinと同じコードポイントを
+% 共有します。すなわち、同じコードポイントが、CJKトークンとしても
+% non-CJKトークンとしても有効に扱われることがあります。
+% 以下に例を示します\footnote{ここで表示しているnon-CJKトークンと
+% して扱われた結果は、up\LaTeX{}のデフォルト従属欧文エンコーディング
+% であるT1の場合のものです。}。
+% {\font\lmr=rm-lmr10\lmr
+% \begin{itemize}
+% \item \texttt{0xA1}: \kchar"A1 (CJK) vs. \char"A1\ (non-CJK)
+% \item \texttt{0xAB}: \kchar"AB (CJK) vs. \char"AB\ (non-CJK)
+% \item \texttt{0xB7}: \kchar"B7 (CJK) vs. \char"B7\ (non-CJK)
+% \item \texttt{0xB9}: \kchar"B9 (CJK) vs. \char"B9\ (non-CJK)
+% \item …
+% \end{itemize}}
+% \file{ukinsoku.tex}ではCJKトークンを優先した禁則設定を行っています。
+% この設定により、同じコードポイントをnon-CJKトークンとして扱う場合に
+% 予期せずLatin-1の文字が禁則対象になってしまいます。
+% 問題が起きた場合は禁則の設定を調整してください。
+% \changes{v1.0-u01}{2017/08/02}{U+00B7 (MIDDLE DOT; JIS X 0213)の
+% 前禁則ペナルティをU+30FBと同じ値に設定、注意点を明文化}
+%
% \begin{macrocode}
%%全角文字
\prebreakpenalty`、=10000
@@ -136,8 +172,8 @@
\prebreakpenalty`＝=200
\postbreakpenalty`＃=200
\postbreakpenalty`＄=200
-\postbreakpenalty`％=200
-\postbreakpenalty`＆=200
+\prebreakpenalty`％=200
+\prebreakpenalty`＆=200
\prebreakpenalty`ぁ=150
\prebreakpenalty`ぃ=150
\prebreakpenalty`ぅ=150
@@ -191,6 +227,7 @@
\postbreakpenalty`¡=10000
\postbreakpenalty`¿=10000
\prebreakpenalty`ː=10000
+\prebreakpenalty`·=10000
\prebreakpenalty`ª=10000
\prebreakpenalty`º=10000
\prebreakpenalty`¹=10000
@@ -485,8 +522,8 @@
%%
%% inhibitxspcode JIS X 0212
%%
-%%\inhibitxspcode`¡=1
-%%\inhibitxspcode`¿=1
+%%\inhibitxspcode`¡=2
+%%\inhibitxspcode`¿=2
%%\inhibitxspcode`º=1
%%\inhibitxspcode`ª=1
\inhibitxspcode`™=1
Modified: trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/source/uplatex/base/uplfonts.dtx 2017-08-27 23:51:50 UTC (rev 45141)
@@ -38,7 +38,7 @@
% 入らないのを修正}
% \changes{v1.3j}{2000/10/24}{\cs{adjustbaseline}で余分なアキが入らない
% ようにした}
-% \changes{v1.3k}{2001/05/10}{\cs{adjustbaseline}の調整量}
+% \changes{v1.3k}{2001/05/10}{欧文書体の基準を再び`/`から`M'に変更}
% \changes{v1.3l}{2002/04/05}{\cs{adjustbaseline}でフォントの基準値が縦書き
% 以外では設定されないのを修正}
% \changes{v1.3m}{2004/06/14}{\cs{fontfamily}コマンド内部フラグ変更}
@@ -75,6 +75,9 @@
% \changes{v1.6f-u00}{2017/03/05}{p\LaTeX{}の変更に追随。}
% \changes{v1.6g}{2017/03/07}{ベースライン補正量を修正}
% \changes{v1.6g-u00}{2017/03/08}{p\LaTeX{}の変更に追随。}
+% \changes{v1.6h}{2017/08/05}{和文書体の基準を全角空白から「漢」に変更}
+% \changes{v1.6h}{2017/08/05}{traceのコードの\texttt{\%}忘れを修正}
+% \changes{v1.6h-u00}{2017/08/05}{p\LaTeX{}の変更に追随。}
% \fi
%
% \iffalse
@@ -81,7 +84,7 @@
%<*driver>
\NeedsTeXFormat{pLaTeX2e}
% \fi
-\ProvidesFile{uplfonts.dtx}[2017/03/08 v1.6g-u00 upLaTeX New Font Selection Scheme]
+\ProvidesFile{uplfonts.dtx}[2017/08/05 v1.6h-u00 upLaTeX New Font Selection Scheme]
% \iffalse
\documentclass{jltxdoc}
\GetFileInfo{uplfonts.dtx}
@@ -155,7 +158,7 @@
%<*trace>
\NeedsTeXFormat{pLaTeX2e}
\ProvidesPackage{uptrace}
- [2017/03/05 v1.6f-u00 Standard upLaTeX package (font tracing)]
+ [2017/08/05 v1.6h-u00 Standard upLaTeX package (font tracing)]
\RequirePackageWithOptions{tracefnt}
%</trace>
% \end{macrocode}
@@ -1156,6 +1159,8 @@
\set at fontsize\baselinestretch\f at size\f at baselineskip
\fi
\size at update}
+%</plcore|trace>
+%<*plcore>
% \end{macrocode}
% \end{macro}
%
@@ -1174,7 +1179,7 @@
% |\fontsize|コマンドの内部形式です。
% ベースラインの設定と、支柱の設定を行ないます。
% \begin{macrocode}
-%</plcore|trace>
+%</plcore>
%<platexrelease|trace>\plIncludeInRelease{2017/04/08}{\set at fontsize}
%<platexrelease|trace> {Construct \ystrutbox}%
%<*plcore|platexrelease|trace>
@@ -1258,7 +1263,7 @@
%</trace>
%<platexrelease|trace> \let\size at update\relax}}
%<platexrelease|trace>\plEndIncludeInRelease
-%<*plcore|trace>
+%<*plcore>
% \end{macrocode}
% \end{macro}
%
@@ -1268,30 +1273,41 @@
% 現在の欧文フォントの``/''の中央がくるようにベースラインシフトを設定します。
% \changes{v1.0c}{1995/08/31}{欧文書体の基準を`M'から`/'に変更}
% \changes{v1.2}{1995/11/21}{縦組時のみ調整するようにした}
-% \changes{v1.3j}{2000/10/24}{文頭に鈎括弧などがあるときに余計なアキがで
-% る問題に対処}
-% \changes{v1.3l}{2002/04/05}{\cs{adjustbaseline}でフォントの基準値が縦書き
-% 以外では設定されないのを修正}
%
% 当初はまずベースラインシフト量をゼロにしていましたが、
% \cs{tbaselineshift}を連続して変更した後に鈎括弧類を使うと余計なアキが
% でる問題が起こるため、\cs{tbaselineshift}をゼロクリアする処理を削除し
% ました。
+% \changes{v1.3j}{2000/10/24}{文頭に鈎括弧などがあるときに余計なアキがで
+% る問題に対処}
%
% しかし、それではベースラインシフトを調整済みの欧文ボックスと比較して
% しまうため、計算した値が大きくなってしまいます。そこで、このボックス
% の中でゼロにするようにしました。また、``/''と比較していたのを``M''に
% しました。
-% \changes{v1.3k}{2001/05/10}{\cs{adjustbaseline}の調整量
-% （再び`M'を基準にした）}
+% \changes{v1.3k}{2001/05/10}{欧文書体の基準を再び`/`から`M'に変更}
+% \changes{v1.3l}{2002/04/05}{\cs{adjustbaseline}でフォントの基準値が縦書き
+% 以外では設定されないのを修正}
+%
+% 全角空白（EUCコード\texttt{0xA1A1}）はJFMで特殊なタイプに分類される可能性
+% があるため、和文書体の基準を「漢」（JISコード\texttt{0x3441}）へ変更しました。
+% \changes{v1.6h}{2017/08/05}{和文書体の基準を全角空白から「漢」に変更}
+%
% \begin{macrocode}
\newbox\adjust at box
\newdimen\adjust at dimen
+% \end{macrocode}
+%
+% \begin{macrocode}
+%</plcore>
+%<platexrelease|trace>\plIncludeInRelease{2017/07/29}{\adjustbaseline}
+%<platexrelease|trace> {Change zenkaku reference}%
+%<*plcore|platexrelease|trace>
\def\adjustbaseline{%
% \end{macrocode}
% 和文フォントの基準値を設定します。
% \begin{macrocode}
- \setbox\adjust at box\hbox{\char\euc"A1A1}%"
+ \setbox\adjust at box\hbox{\char\jis"3441}%"
\cht\ht\adjust at box
\cdp\dp\adjust at box
\cwd\wd\adjust at box
@@ -1305,10 +1321,11 @@
%
% \begin{eqnarray*}
% \textmc{ベースラインシフト量} &=&
-% \{ (\textmc{全角空白の深さ}) - (\textmc{Mの深さ}) \} \\
-% &&- \frac{(\textmc{全角空白の高さ$+$深さ})
+% \{ (\textmc{漢の深さ}) - (\textmc{Mの深さ}) \} \\
+% &&- \frac{(\textmc{漢の高さ$+$深さ})
% - (\textmc{Mの高さ$+$深さ})}{2}
% \end{eqnarray*}
+% \changes{v1.6h}{2017/08/05}{traceのコードの\texttt{\%}忘れを修正}
%
% \begin{macrocode}
\iftdir
@@ -1320,11 +1337,38 @@
\advance\adjust at dimen\cdp
\advance\adjust at dimen-\dp\adjust at box
\tbaselineshift\adjust at dimen
-%<trace> \ifnum \tracingfonts>\tw@
-%<trace> \typeout{baselineshift:\the\tbaselineshift}
-%<trace> \fi
+%<trace> \ifnum \tracingfonts>\tw@
+%<trace> \typeout{baselineshift:\the\tbaselineshift}%
+%<trace> \fi
\fi}
-%</plcore|trace>
+%</plcore|platexrelease|trace>
+%<platexrelease|trace>\plEndIncludeInRelease
+%<platexrelease|trace>\plIncludeInRelease{0000/00/00}{\adjustbaseline}
+%<platexrelease|trace> {Change zenkaku reference}%
+%<platexrelease|trace>\def\adjustbaseline{%
+%<platexrelease|trace> \setbox\adjust at box\hbox{\char\euc"A1A1}%"
+%<platexrelease|trace> \cht\ht\adjust at box
+%<platexrelease|trace> \cdp\dp\adjust at box
+%<platexrelease|trace> \cwd\wd\adjust at box
+%<platexrelease|trace> \cvs\normalbaselineskip
+%<platexrelease|trace> \chs\cwd
+%<platexrelease|trace> \cHT\cht \advance\cHT\cdp
+%<platexrelease|trace> \iftdir
+%<platexrelease|trace> \setbox\adjust at box\hbox{\tbaselineshift\z@ M}%
+%<platexrelease|trace> \adjust at dimen\ht\adjust at box
+%<platexrelease|trace> \advance\adjust at dimen\dp\adjust at box
+%<platexrelease|trace> \advance\adjust at dimen-\cHT
+%<platexrelease|trace> \divide\adjust at dimen\tw@
+%<platexrelease|trace> \advance\adjust at dimen\cdp
+%<platexrelease|trace> \advance\adjust at dimen-\dp\adjust at box
+%<platexrelease|trace> \tbaselineshift\adjust at dimen
+%<*trace>
+%<platexrelease|trace> \ifnum \tracingfonts>\tw@
+%<platexrelease|trace> \typeout{baselineshift:\the\tbaselineshift}
+%<platexrelease|trace> \fi
+%</trace>
+%<platexrelease|trace> \fi}
+%<platexrelease|trace>\plEndIncludeInRelease
%<*plcore>
% \end{macrocode}
% \end{macro}
@@ -1418,7 +1462,9 @@
}
\let\kenc at update\relax
% \end{macrocode}
+% \end{macro}
%
+% \begin{macro}{\@changed at kcmd}
% |\@changed at cmd|の和文エンコーディングバージョン。
% \changes{v1.3n}{2004/08/10}{和文エンコーディングの切り替えを有効化}
% \begin{macrocode}
@@ -1765,42 +1811,6 @@
% \end{macro}
%
%
-%
-% \subsection{デフォルト設定ファイルの読み込み}
-% 最後に、デフォルト設定ファイルである、\file{upldefs.ltx}を読み込みます。
-% このファイルについての詳細は、第\ref{plfonts:pldefs}節を参照してください。
-% \TeX{}の入力ファイル検索パスに設定されているディレクトリに\file{upldefs.cfg}%
-% ファイルがある場合は、そのファイルを使います。
-% \begin{macrocode}
-\InputIfFileExists{upldefs.cfg}
- {\typeout{*************************************^^J%
- * Local config file upldefs.cfg used^^J%
- *************************************}}%
- {\input{upldefs.ltx}}
-%</plcore>
-% \end{macrocode}
-%
-%
-%
-%
-% \section{デフォルト設定ファイル}\label{plfonts:pldefs}
-% ここでは、フォーマットファイルに読み込まれるデフォルト値を設定しています。
-% この節での内容は\file{pldefs.ltx}に出力されます。
-% このファイルの内容を\file{plcore.ltx}に含めてもよいのですが、
-% デフォルトの設定を参照しやすいように、別ファイルにしてあります。
-% \file{pldefs.ltx}は\file{plcore.ltx}から読み込まれます。
-%
-% プリロードサイズは、\dst{}プログラムのオプションで変更することができます。
-% これ以外の設定を変更したい場合は、\file{pldefs.ltx}を
-% 直接、修正するのではなく、このファイルを\file{pldefs.cfg}という名前で
-% コピーをして、そのファイルに対して修正を加えるようにしてください。
-% \begin{macrocode}
-%<*pldefs>
-\ProvidesFile{upldefs.ltx}
- [2016/06/29 v1.6e-u00 upLaTeX Kernel (Default settings)]
-%</pldefs>
-% \end{macrocode}
-%
% \subsection{合成文字}
% \LaTeXe{}のカーネルのコードをそのまま使うと、p\TeX{}のベースライン
% 補正量がゼロでないときに合成文字がおかしくなっていたため、対策します。
@@ -1811,11 +1821,12 @@
% $-1$が返ります。
% \changes{v1.6c}{2016/06/06}{マクロ追加}
% \begin{macrocode}
+%</plcore>
%<platexrelease>\plIncludeInRelease{2016/06/10}{\g at tlastchart@}
%<platexrelease> {Added \g at tlastchart@}%
-%<*pldefs|platexrelease>
+%<*plcore|platexrelease>
\def\g at tlastchart@#1{#1\ifx\lastnodechar\@undefined\m at ne\else\lastnodechar\fi}
-%</pldefs|platexrelease>
+%</plcore|platexrelease>
%<platexrelease>\plEndIncludeInRelease
%<platexrelease>\plIncludeInRelease{0000/00/00}{\g at tlastchart@}
%<platexrelease> {Added \g at tlastchart@}%
@@ -1832,7 +1843,7 @@
% \begin{macrocode}
%<platexrelease>\plIncludeInRelease{2016/06/10}{\pltx at isletter}
%<platexrelease> {Added \pltx at isletter}%
-%<*pldefs|platexrelease>
+%<*plcore|platexrelease>
\def\pltx at mark{\pltx at mark@}
\let\pltx at scanstop\relax
\long\def\pltx at cond#1\fi{%
@@ -1851,7 +1862,7 @@
\pltx at cond{\ifnum0\ifcat A\noexpand#21\fi\ifcat=\noexpand#21\fi>\z@}\fi
{\@firstoftwo}{\@secondoftwo}%
}{\@secondoftwo}}
-%</pldefs|platexrelease>
+%</plcore|platexrelease>
%<platexrelease>\plEndIncludeInRelease
%<platexrelease>\plIncludeInRelease{0000/00/00}{\pltx at isletter}
%<platexrelease> {Added \pltx at isletter}%
@@ -1990,10 +2001,46 @@
%<platexrelease> \fi
%<platexrelease> #1}
%<platexrelease>\plEndIncludeInRelease
-%<*pldefs>
+%<*plcore>
% \end{macrocode}
% \end{macro}
%
+%
+% \subsection{デフォルト設定ファイルの読み込み}
+% 最後に、デフォルト設定ファイルである、\file{upldefs.ltx}を読み込みます。
+% このファイルについての詳細は、第\ref{plfonts:pldefs}節を参照してください。
+% \TeX{}の入力ファイル検索パスに設定されているディレクトリに\file{upldefs.cfg}%
+% ファイルがある場合は、そのファイルを使います。
+% \begin{macrocode}
+\InputIfFileExists{upldefs.cfg}
+ {\typeout{*************************************^^J%
+ * Local config file upldefs.cfg used^^J%
+ *************************************}}%
+ {\input{upldefs.ltx}}
+%</plcore>
+% \end{macrocode}
+%
+%
+%
+%
+% \section{デフォルト設定ファイル}\label{plfonts:pldefs}
+% ここでは、フォーマットファイルに読み込まれるデフォルト値を設定しています。
+% この節での内容は\file{pldefs.ltx}に出力されます。
+% このファイルの内容を\file{plcore.ltx}に含めてもよいのですが、
+% デフォルトの設定を参照しやすいように、別ファイルにしてあります。
+% \file{pldefs.ltx}は\file{plcore.ltx}から読み込まれます。
+%
+% プリロードサイズは、\dst{}プログラムのオプションで変更することができます。
+% これ以外の設定を変更したい場合は、\file{pldefs.ltx}を
+% 直接、修正するのではなく、このファイルを\file{pldefs.cfg}という名前で
+% コピーをして、そのファイルに対して修正を加えるようにしてください。
+% \begin{macrocode}
+%<*pldefs>
+\ProvidesFile{upldefs.ltx}
+ [2017/08/05 v1.6h-u00 upLaTeX Kernel (Default settings)]
+%</pldefs>
+% \end{macrocode}
+%
% \subsection{イタリック補正}
% \changes{v1.3i}{2000/07/13}{\cs{text..}コマンドの左側に\cs{xkanjiskip}が
% 入らないのを修正（ありがとう、乙部＠東大さん）}
@@ -2001,6 +2048,7 @@
% 「\verb|あ\texttt{abc}い|」としたとき、書体の変更を指定された欧文の左側に
% 和欧文間スペースが入らないのを修正します。
% \begin{macrocode}
+%<*pldefs>
\def \check at nocorr@ #1#2\nocorr#3\@nil {%
\let \check at icl \relax% \maybe at ic から変更
\def \check at icr {\ifvmode \else \aftergroup \maybe at ic \fi}%
Modified: trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx
===================================================================
--- trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/source/uplatex/base/uplvers.dtx 2017-08-27 23:51:50 UTC (rev 45141)
@@ -142,7 +142,7 @@
{2017/07/29u01}
%</plcore|platexrelease>
%<*plcore>
-\def\ppatch at level{0}
+\def\ppatch at level{1}
%</plcore>
% \end{macrocode}
% \end{macro}
Modified: trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/tex/uplatex/base/ukinsoku.tex 2017-08-27 23:51:50 UTC (rev 45141)
@@ -22,8 +22,8 @@
\prebreakpenalty`"=10000
\postbreakpenalty`\#=500
\postbreakpenalty`\$=500
-\postbreakpenalty`\%=500
-\postbreakpenalty`\&=500
+\prebreakpenalty`\%=500
+\prebreakpenalty`\&=500
\postbreakpenalty`\`=10000
\prebreakpenalty`'=10000
\prebreakpenalty`)=10000
@@ -87,8 +87,8 @@
\prebreakpenalty`＝=200
\postbreakpenalty`＃=200
\postbreakpenalty`＄=200
-\postbreakpenalty`％=200
-\postbreakpenalty`＆=200
+\prebreakpenalty`％=200
+\prebreakpenalty`＆=200
\prebreakpenalty`ぁ=150
\prebreakpenalty`ぃ=150
\prebreakpenalty`ぅ=150
@@ -142,6 +142,7 @@
\postbreakpenalty`¡=10000
\postbreakpenalty`¿=10000
\prebreakpenalty`ː=10000
+\prebreakpenalty`·=10000
\prebreakpenalty`ª=10000
\prebreakpenalty`º=10000
\prebreakpenalty`¹=10000
@@ -394,8 +395,8 @@
%%
%% inhibitxspcode JIS X 0212
%%
-%%\inhibitxspcode`¡=1
-%%\inhibitxspcode`¿=1
+%%\inhibitxspcode`¡=2
+%%\inhibitxspcode`¿=2
%%\inhibitxspcode`º=1
%%\inhibitxspcode`ª=1
\inhibitxspcode`™=1
Modified: trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/tex/uplatex/base/uplcore.ltx 2017-08-27 23:51:50 UTC (rev 45141)
@@ -20,7 +20,7 @@
\def\pfmtname{pLaTeX2e}
\def\pfmtversion
{2017/07/29u01}
-\def\ppatch at level{0}
+\def\ppatch at level{1}
\def\plIncludeInRelease#1{\kernel at ifnextchar[%
{\@plIncludeInRelease{#1}}
{\@plIncludeInRelease{#1}[#1]}}
@@ -445,7 +445,7 @@
\newbox\adjust at box
\newdimen\adjust at dimen
\def\adjustbaseline{%
- \setbox\adjust at box\hbox{\char\euc"A1A1}%"
+ \setbox\adjust at box\hbox{\char\jis"3441}%"
\cht\ht\adjust at box
\cdp\dp\adjust at box
\cwd\wd\adjust at box
@@ -641,6 +641,25 @@
\else\tbaselineshift\fi
\else\ybaselineshift\fi
\vbox{\hrule\@width.3em}}
+\def\g at tlastchart@#1{#1\ifx\lastnodechar\@undefined\m at ne\else\lastnodechar\fi}
+\def\pltx at mark{\pltx at mark@}
+\let\pltx at scanstop\relax
+\long\def\pltx at cond#1\fi{%
+ #1\expandafter\@firstoftwo\else\expandafter\@secondoftwo\fi}
+\long\def\pltx at isletter#1{%
+ \expandafter\pltx at isletter@i#1\pltx at scanstop}
+\long\def\pltx at isletter@i#1\pltx at scanstop{%
+ \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi{\@firstoftwo}%
+ {\pltx at isletter@ii\pltx at scanstop#1\pltx at scanstop{}#1\pltx at mark}}
+\long\def\pltx at isletter@ii#1\pltx at scanstop#{%
+ \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi%
+ {\pltx at isletter@iii}{\pltx at isletter@iv}}
+\long\def\pltx at isletter@iii#1\pltx at mark{\@secondoftwo}
+\long\def\pltx at isletter@iv#1#2#3\pltx at mark{%
+ \pltx at cond\ifx\pltx at mark#3\pltx at mark\fi{%
+ \pltx at cond{\ifnum0\ifcat A\noexpand#21\fi\ifcat=\noexpand#21\fi>\z@}\fi
+ {\@firstoftwo}{\@secondoftwo}%
+ }{\@secondoftwo}}
\InputIfFileExists{upldefs.cfg}
{\typeout{*************************************^^J%
* Local config file upldefs.cfg used^^J%
@@ -701,7 +720,7 @@
\@tempskipa\lastskip
\unskip
\penalty #1\@getpen{#2}%
- \hskip\z@\relax %% added (2017/05/03)
+ \penalty\z@\relax %% added (2017/08/25)
\ifdim\@tempskipa>\z@
\hskip\@tempskipa
\ignorespaces
Modified: trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/tex/uplatex/base/upldefs.ltx 2017-08-27 23:51:50 UTC (rev 45141)
@@ -15,26 +15,7 @@
%%
%% File: uplfonts.dtx
\ProvidesFile{upldefs.ltx}
- [2016/06/29 v1.6e-u00 upLaTeX Kernel (Default settings)]
-\def\g at tlastchart@#1{#1\ifx\lastnodechar\@undefined\m at ne\else\lastnodechar\fi}
-\def\pltx at mark{\pltx at mark@}
-\let\pltx at scanstop\relax
-\long\def\pltx at cond#1\fi{%
- #1\expandafter\@firstoftwo\else\expandafter\@secondoftwo\fi}
-\long\def\pltx at isletter#1{%
- \expandafter\pltx at isletter@i#1\pltx at scanstop}
-\long\def\pltx at isletter@i#1\pltx at scanstop{%
- \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi{\@firstoftwo}%
- {\pltx at isletter@ii\pltx at scanstop#1\pltx at scanstop{}#1\pltx at mark}}
-\long\def\pltx at isletter@ii#1\pltx at scanstop#{%
- \pltx at cond\ifx\pltx at mark#1\pltx at mark\fi%
- {\pltx at isletter@iii}{\pltx at isletter@iv}}
-\long\def\pltx at isletter@iii#1\pltx at mark{\@secondoftwo}
-\long\def\pltx at isletter@iv#1#2#3\pltx at mark{%
- \pltx at cond\ifx\pltx at mark#3\pltx at mark\fi{%
- \pltx at cond{\ifnum0\ifcat A\noexpand#21\fi\ifcat=\noexpand#21\fi>\z@}\fi
- {\@firstoftwo}{\@secondoftwo}%
- }{\@secondoftwo}}
+ [2017/08/05 v1.6h-u00 upLaTeX Kernel (Default settings)]
\def \check at nocorr@ #1#2\nocorr#3\@nil {%
\let \check at icl \relax% \maybe at ic から変更
\def \check at icr {\ifvmode \else \aftergroup \maybe at ic \fi}%
Modified: trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty
===================================================================
--- trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty 2017-08-27 23:51:34 UTC (rev 45140)
+++ trunk/Master/texmf-dist/tex/uplatex/base/uptrace.sty 2017-08-27 23:51:50 UTC (rev 45141)
@@ -16,7 +16,7 @@
%% File: uplfonts.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesPackage{uptrace}
- [2017/03/05 v1.6f-u00 Standard upLaTeX package (font tracing)]
+ [2017/08/05 v1.6h-u00 Standard upLaTeX package (font tracing)]
\RequirePackageWithOptions{tracefnt}
\DeclareRobustCommand\selectfont{%
\let\tmp at error@fontshape\error at fontshape
@@ -73,8 +73,6 @@
\set at fontsize\baselinestretch\f at size\f at baselineskip
\fi
\size at update}
-\def\KanjiEncodingPair#1#2{\@namedef{t at enc@#1}{#2}\@namedef{y at enc@#2}{#1}}
-\KanjiEncodingPair{JY2}{JT2}
\plIncludeInRelease{2017/04/08}{\set at fontsize}
{Construct \ystrutbox}%
\def\set at fontsize#1#2#3{%
@@ -145,9 +143,33 @@
\fi
\let\size at update\relax}}
\plEndIncludeInRelease
-\newbox\adjust at box
-\newdimen\adjust at dimen
+\plIncludeInRelease{2017/07/29}{\adjustbaseline}
+ {Change zenkaku reference}%
\def\adjustbaseline{%
+ \setbox\adjust at box\hbox{\char\jis"3441}%"
+ \cht\ht\adjust at box
+ \cdp\dp\adjust at box
+ \cwd\wd\adjust at box
+ \cvs\normalbaselineskip
+ \chs\cwd
+ \cHT\cht \advance\cHT\cdp
+ \iftdir
+ \setbox\adjust at box\hbox{\tbaselineshift\z@ M}%
+ \adjust at dimen\ht\adjust at box
+ \advance\adjust at dimen\dp\adjust at box
+ \advance\adjust at dimen-\cHT
+ \divide\adjust at dimen\tw@
+ \advance\adjust at dimen\cdp
+ \advance\adjust at dimen-\dp\adjust at box
+ \tbaselineshift\adjust at dimen
+ \ifnum \tracingfonts>\tw@
+ \typeout{baselineshift:\the\tbaselineshift}%
+ \fi
+ \fi}
+\plEndIncludeInRelease
+\plIncludeInRelease{0000/00/00}{\adjustbaseline}
+ {Change zenkaku reference}%
+\def\adjustbaseline{%
\setbox\adjust at box\hbox{\char\euc"A1A1}%"
\cht\ht\adjust at box
\cdp\dp\adjust at box
@@ -164,10 +186,11 @@
\advance\adjust at dimen\cdp
\advance\adjust at dimen-\dp\adjust at box
\tbaselineshift\adjust at dimen
- \ifnum \tracingfonts>\tw@
- \typeout{baselineshift:\the\tbaselineshift}
- \fi
+ \ifnum \tracingfonts>\tw@
+ \typeout{baselineshift:\the\tbaselineshift}
+ \fi
\fi}
+\plEndIncludeInRelease
\endinput
%%
%% End of file `uptrace.sty'.
More information about the tex-live-commits
mailing list