summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/uplatex/base/uptrace.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/uplatex/base/uptrace.sty')
-rw-r--r--Master/texmf-dist/tex/uplatex/base/uptrace.sty179
1 files changed, 3 insertions, 176 deletions
diff --git a/Master/texmf-dist/tex/uplatex/base/uptrace.sty b/Master/texmf-dist/tex/uplatex/base/uptrace.sty
index cba13346d34..e1a938ba6c7 100644
--- a/Master/texmf-dist/tex/uplatex/base/uptrace.sty
+++ b/Master/texmf-dist/tex/uplatex/base/uptrace.sty
@@ -8,7 +8,7 @@
%%
%% Copyright (c) 2010 ASCII MEDIA WORKS
%% Copyright (c) 2016 Takuji Tanaka
-%% Copyright (c) 2016 Japanese TeX Development Community
+%% Copyright (c) 2016-2018 Japanese TeX Development Community
%%
%% This file is part of the upLaTeX2e system (community edition).
%% --------------------------------------------------------------
@@ -16,181 +16,8 @@
%% File: uplfonts.dtx
\NeedsTeXFormat{pLaTeX2e}
\ProvidesPackage{uptrace}
- [2017/08/05 v1.6h-u00 Standard upLaTeX package (font tracing)]
-\RequirePackageWithOptions{tracefnt}
-\DeclareRobustCommand\selectfont{%
- \let\tmp@error@fontshape\error@fontshape
- \let\error@fontshape\error@kfontshape
- \edef\tmp@item{{\k@encoding}}%
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp@item\expandafter{\kyenc@list}%
- \ifin@
- \let\cy@encoding\k@encoding
- \edef\ct@encoding{\csname t@enc@\k@encoding\endcsname}%
- \else
- \expandafter\expandafter\expandafter
- \inlist@\expandafter\tmp@item\expandafter{\ktenc@list}%
- \ifin@
- \let\ct@encoding\k@encoding
- \edef\cy@encoding{\csname y@enc@\k@encoding\endcsname}%
- \else
- \@latex@error{KANJI Encoding scheme `\k@encoding' unknown}\@eha
- \fi
- \fi
- \let\font\tfont
- \let\k@encoding\ct@encoding
- \xdef\font@name{\csname\curr@kfontshape/\f@size\endcsname}%
- \pickup@font
- \font@name
- \let\font\jfont
- \let\k@encoding\cy@encoding
- \xdef\font@name{\csname\curr@kfontshape/\f@size\endcsname}%
- \pickup@font
- \font@name
- \expandafter\def\expandafter\k@encoding\tmp@item
- \kenc@update
- \let\error@fontshape\tmp@error@fontshape
- \if@knjcmd \@knjcmdfalse
- \expandafter\ifx
- \csname rel@\k@encoding/\k@family/\k@series/\k@shape\endcsname\relax
- \expandafter\ifx
- \csname rel@\k@encoding/\k@family/\k@series/all\endcsname\relax
- \else
- \csname rel@\k@encoding/\k@family/\k@series/all\endcsname
- \fi
- \else
- \csname rel@\k@encoding/\k@family/\k@series/\k@shape\endcsname
- \fi
- \fi
- \let\font\afont
- \xdef\font@name{\csname\curr@fontshape/\f@size\endcsname}%
- \pickup@font
- \font@name
- \ifnum \tracingfonts>\tw@
- \@font@info{Roman:Switching to \font@name}\fi
- \enc@update
- \ifx\f@linespread\baselinestretch \else
- \set@fontsize\baselinestretch\f@size\f@baselineskip
- \fi
- \size@update}
-\plIncludeInRelease{2017/04/08}{\set@fontsize}
- {Construct \ystrutbox}%
-\def\set@fontsize#1#2#3{%
- \@defaultunits\@tempdimb#2pt\relax\@nnil
- \edef\f@size{\strip@pt\@tempdimb}%
- \@defaultunits\@tempskipa#3pt\relax\@nnil
- \edef\f@baselineskip{\the\@tempskipa}%
- \edef\f@linespread{#1}%
- \let\baselinestretch\f@linespread
- \def\size@update{%
- \baselineskip\f@baselineskip\relax
- \baselineskip\f@linespread\baselineskip
- \normalbaselineskip\baselineskip
- \adjustbaseline
- \setbox\ystrutbox\hbox{\yoko
- \vrule\@width\z@
- \@height.7\baselineskip \@depth.3\baselineskip}%
- \setbox\tstrutbox\hbox{\tate
- \vrule\@width\z@
- \@height.5\baselineskip \@depth.5\baselineskip}%
- \setbox\zstrutbox\hbox{\tate
- \vrule\@width\z@
- \@height.7\baselineskip \@depth.3\baselineskip}%
- \ifnum \tracingfonts>\tw@
- \ifx\f@linespread\@empty
- \let\reserved@a\@empty
- \else
- \def\reserved@a{\f@linespread x}%
- \fi
- \@font@info{Changing size to\space
- \f@size/\reserved@a \f@baselineskip}%
- \aftergroup\type@restoreinfo
- \fi
- \let\size@update\relax}}
-\plEndIncludeInRelease
-\plIncludeInRelease{0000/00/00}{\set@fontsize}
- {Construct \ystrutbox}%
-\def\set@fontsize#1#2#3{%
- \@defaultunits\@tempdimb#2pt\relax\@nnil
- \edef\f@size{\strip@pt\@tempdimb}%
- \@defaultunits\@tempskipa#3pt\relax\@nnil
- \edef\f@baselineskip{\the\@tempskipa}%
- \edef\f@linespread{#1}%
- \let\baselinestretch\f@linespread
- \def\size@update{%
- \baselineskip\f@baselineskip\relax
- \baselineskip\f@linespread\baselineskip
- \normalbaselineskip\baselineskip
- \adjustbaseline
- \setbox\strutbox\hbox{\yoko
- \vrule\@width\z@
- \@height.7\baselineskip \@depth.3\baselineskip}%
- \setbox\tstrutbox\hbox{\tate
- \vrule\@width\z@
- \@height.5\baselineskip \@depth.5\baselineskip}%
- \setbox\zstrutbox\hbox{\tate
- \vrule\@width\z@
- \@height.7\baselineskip \@depth.3\baselineskip}%
- \ifnum \tracingfonts>\tw@
- \ifx\f@linespread\@empty
- \let\reserved@a\@empty
- \else
- \def\reserved@a{\f@linespread x}%
- \fi
- \@font@info{Changing size to\space
- \f@size/\reserved@a \f@baselineskip}%
- \aftergroup\type@restoreinfo
- \fi
- \let\size@update\relax}}
-\plEndIncludeInRelease
-\plIncludeInRelease{2017/07/29}{\adjustbaseline}
- {Change zenkaku reference}%
-\def\adjustbaseline{%
- \setbox\adjust@box\hbox{\char\jis"3441}%"
- \cht\ht\adjust@box
- \cdp\dp\adjust@box
- \cwd\wd\adjust@box
- \cvs\normalbaselineskip
- \chs\cwd
- \cHT\cht \advance\cHT\cdp
- \iftdir
- \setbox\adjust@box\hbox{\tbaselineshift\z@ M}%
- \adjust@dimen\ht\adjust@box
- \advance\adjust@dimen\dp\adjust@box
- \advance\adjust@dimen-\cHT
- \divide\adjust@dimen\tw@
- \advance\adjust@dimen\cdp
- \advance\adjust@dimen-\dp\adjust@box
- \tbaselineshift\adjust@dimen
- \ifnum \tracingfonts>\tw@
- \typeout{baselineshift:\the\tbaselineshift}%
- \fi
- \fi}
-\plEndIncludeInRelease
-\plIncludeInRelease{0000/00/00}{\adjustbaseline}
- {Change zenkaku reference}%
-\def\adjustbaseline{%
- \setbox\adjust@box\hbox{\char\euc"A1A1}%"
- \cht\ht\adjust@box
- \cdp\dp\adjust@box
- \cwd\wd\adjust@box
- \cvs\normalbaselineskip
- \chs\cwd
- \cHT\cht \advance\cHT\cdp
- \iftdir
- \setbox\adjust@box\hbox{\tbaselineshift\z@ M}%
- \adjust@dimen\ht\adjust@box
- \advance\adjust@dimen\dp\adjust@box
- \advance\adjust@dimen-\cHT
- \divide\adjust@dimen\tw@
- \advance\adjust@dimen\cdp
- \advance\adjust@dimen-\dp\adjust@box
- \tbaselineshift\adjust@dimen
- \ifnum \tracingfonts>\tw@
- \typeout{baselineshift:\the\tbaselineshift}
- \fi
- \fi}
-\plEndIncludeInRelease
+ [2017/12/10 v1.6k-u02 Standard upLaTeX package (font tracing)]
+\RequirePackageWithOptions{ptrace}
\endinput
%%
%% End of file `uptrace.sty'.