diff options
author | Norbert Preining <preining@logic.at> | 2012-04-24 00:13:14 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2012-04-24 00:13:14 +0000 |
commit | 8f29bdce0bdd08ec81df555e98692d1f288c3289 (patch) | |
tree | c4f9a6b00a587f635e55fc4068c1961780c90591 /Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty | |
parent | 74e624196144ae218a63a4c35672fc7a0e7b18dc (diff) |
new package luatexja (24apr)
adapt ctan2tds to deal with it
git-svn-id: svn://tug.org/texlive/trunk@26115 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty')
-rw-r--r-- | Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty | 137 |
1 files changed, 137 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty b/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty new file mode 100644 index 00000000000..5059ef9d53e --- /dev/null +++ b/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty @@ -0,0 +1,137 @@ +% +% lltjp-listings.sty +% + +\NeedsTeXFormat{LaTeX2e} +\def\filedate{2012/02/02} +\def\fileversion{0.51} +\ProvidesPackage{lltjp-listings}[\filedate\space\fileversion] +\RequirePackage{listings,luatexbase-cctb} + +% catcode 対策 +\newluatexcatcodetable\CatcodeTableLTJlistings +\setluatexcatcodetable\CatcodeTableLTJlistings{ + \luatexcatcodetable\CatcodeTableLaTeXAtLetter + \catcode"FFFFF=9%" + \setcatcoderange{"2000}{"FFFF}{13}% + \setcatcoderange{"20000}{"2FFFF}{13}} + +% lowest level +\def\lst@ProcessJALetter{\lst@whitespacefalse \lst@AppendJALetter} +\def\lst@AppendJALetter{% + \lst@ifletter \lst@Output\else\lst@OutputOther\fi\lst@lettertrue + \advance\lst@length\@ne\lst@Append} +\def\lst@ProcessJALetterHalf{\lst@whitespacefalse \lst@AppendJALetterHalf} +\def\lst@AppendJALetterHalf{% + \lst@ifletter \lst@Output\else\lst@OutputOther\fi\lst@lettertrue + \lst@Append} + +% loading lltjp-listing-jpt.tex +\def\ltj@@listing@jpset#1#2{% fast: #2-#1+1 must be a multiple of 16 + \@tempcnta=#1 \@tempcntb=#2 \@temptokena{}% + \loop\relax\ifnum\@tempcnta<\@tempcntb\relax + \ltj@@listing@jpset@\global\advance\@tempcnta\sixt@@n\repeat + \expandafter\edef\csname ltj@@listing@jpcmd@i#1\endcsname{\the\@temptokena}% + \toks@\expandafter\expandafter\expandafter\expandafter% + \expandafter\expandafter\expandafter{\expandafter\expandafter% + \expandafter\the\expandafter\toks@\csname ltj@@listing@jpcmd@i#1\endcsname}% +} +\def\ltj@@listing@jpsetN#1#2#3{% + \@tempcnta=#1 \@tempcntb=#2 \@temptokena{}% + \loop \global\advance\@tempcnta\@ne\ifnum\@tempcnta<\@tempcntb\relax + \ltj@@listing@jpsetN@#3\repeat + \expandafter\edef\csname ltj@@listing@jpcmd@i#1\endcsname{\the\@temptokena}% + \toks@\expandafter\expandafter\expandafter\expandafter% + \expandafter\expandafter\expandafter{\expandafter\expandafter% + \expandafter\the\expandafter\toks@\csname ltj@@listing@jpcmd@i#1\endcsname}% +} + +\begingroup +\catcode`\^^a0=13\catcode`\^^a1=13\catcode`\^^a2=13\catcode`\^^a3=13 +\catcode`\^^a4=13\catcode`\^^a5=13\catcode`\^^a6=13\catcode`\^^a7=13 +\catcode`\^^a8=13\catcode`\^^a9=13\catcode`\^^aa=13\catcode`\^^ab=13 +\catcode`\^^ac=13\catcode`\^^ad=13\catcode`\^^ae=13\catcode`\^^af=13 +\catcode`\^^b0=12\catcode`\^^b1=12\catcode`\^^b2=12\catcode`\^^b3=12 +\catcode`\^^b4=12\catcode`\^^b5=12\catcode`\^^b6=12\catcode`\^^b7=12 +\catcode`\^^b8=12\catcode`\^^b9=12\catcode`\^^ba=12\catcode`\^^bb=12 +\catcode`\^^bc=12\catcode`\^^bd=12\catcode`\^^be=12\catcode`\^^bf=12 +\gdef\ltj@@listing@jpset@{% + {\lccode`\^^a0=\@tempcnta \lccode`\^^b0=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a1=\@tempcnta \lccode`\^^b1=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a2=\@tempcnta \lccode`\^^b2=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a3=\@tempcnta \lccode`\^^b3=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a4=\@tempcnta \lccode`\^^b4=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a5=\@tempcnta \lccode`\^^b5=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a6=\@tempcnta \lccode`\^^b6=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a7=\@tempcnta \lccode`\^^b7=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a8=\@tempcnta \lccode`\^^b8=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^a9=\@tempcnta \lccode`\^^b9=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^aa=\@tempcnta \lccode`\^^ba=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^ab=\@tempcnta \lccode`\^^bb=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^ac=\@tempcnta \lccode`\^^bc=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^ad=\@tempcnta \lccode`\^^bd=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^ae=\@tempcnta \lccode`\^^be=\@tempcnta + \advance\@tempcnta\@ne\lccode`\^^af=\@tempcnta \lccode`\^^bf=\@tempcnta + \lowercase{\gdef\@temp{% + \gdef^^a0{\lst@ProcessJALetter^^b0}\gdef^^a1{\lst@ProcessJALetter^^b1}% + \gdef^^a2{\lst@ProcessJALetter^^b2}\gdef^^a3{\lst@ProcessJALetter^^b3}% + \gdef^^a4{\lst@ProcessJALetter^^b4}\gdef^^a5{\lst@ProcessJALetter^^b5}% + \gdef^^a6{\lst@ProcessJALetter^^b6}\gdef^^a7{\lst@ProcessJALetter^^b7}% + \gdef^^a8{\lst@ProcessJALetter^^b8}\gdef^^a9{\lst@ProcessJALetter^^b9}% + \gdef^^aa{\lst@ProcessJALetter^^ba}\gdef^^ab{\lst@ProcessJALetter^^bb}% + \gdef^^ac{\lst@ProcessJALetter^^bc}\gdef^^ad{\lst@ProcessJALetter^^bd}% + \gdef^^ae{\lst@ProcessJALetter^^be}\gdef^^af{\lst@ProcessJALetter^^bf}% + }}%\message{\meaning\@temp}% + }% + \@temptokena\expandafter\expandafter\expandafter\expandafter% + \expandafter\expandafter\expandafter{\expandafter\expandafter% + \expandafter\the\expandafter\@temptokena\@temp}% +} +\gdef\ltj@@listing@jpsetN@#1{{% + \lccode`\~=\@tempcnta \lccode`\/=\@tempcnta + \lowercase{\gdef\@temp{\gdef~{#1/}}}}% + \@temptokena\expandafter\expandafter\expandafter\expandafter% + \expandafter\expandafter\expandafter{\expandafter\expandafter% + \expandafter\the\expandafter\@temptokena\@temp}% +} +\endgroup + + +\toks@{} +\input lltjp-listings-jpt.tex +\edef\ltj@@listing@jpcmd{\the\toks@} +\toks@{} +\lst@AddToHook{Init}{% + \luatexcatcodetable\CatcodeTableLTJlistings + \ltj@@listing@jpcmd} + + +% 白線対策 +\def\lst@OutputToken{% + \lst@TrackNewLines \lst@OutputLostSpace + \lst@ifgobbledws + \lst@gobbledwhitespacefalse + \lst@@discretionary + \fi + \lst@CheckMerge + {\lst@thestyle{\lst@FontAdjust + \setbox\@tempboxa\lst@hbox + {\lsthk@OutputBox + \lst@lefthss + \expandafter\lst@FillOutputBox\the\lst@token\@empty + \lst@righthss}% + \ht\@tempboxa=0pt\dp\@tempboxa=0pt + \lst@CalcLostSpaceAndOutput}}% + \lst@ResetToken} + + +% \begin{修正事項}{1.3} from jlisting.sty +% ちょっとした修正 +\gdef\lst@breakProcessOther#1{\lst@ProcessOther#1} +% ソースコード目次における文字と番号の空き +\let \l@lstlisting = \l@figure +% キャプションとソースコード目次に対する日本語対応 +\def\lstlistingname{ソースコード} +\def\lstlistlistingname{ソースコード目次} +% \end{修正事項} +\endinput
\ No newline at end of file |