5 \NeedsTeXFormat{LaTeX2e}
6 \def\filedate{2012/02/02}
8 \ProvidesPackage{lltjp-listings}[\filedate\space\fileversion]
9 \RequirePackage{listings,luatexbase-cctb}
12 \newluatexcatcodetable\CatcodeTableLTJlistings
13 \setluatexcatcodetable\CatcodeTableLTJlistings{
14 \luatexcatcodetable\CatcodeTableLaTeXAtLetter
16 \setcatcoderange{"2000}{"FFFF}{13}%
17 \setcatcoderange{"20000}{"2FFFF}{13}}
20 \def\lst@kanjitrue{\let\lst@ifkanji\iftrue}
21 \def\lst@kanjifalse{\let\lst@ifkanji\iffalse}
22 \lst@AddToHook{InitVars}{\lst@kanjifalse}
24 \def\lst@AppendOther{%
25 \lst@ifletter\lst@Output\lst@letterfalse\fi\lst@kanjifalse
26 \futurelet\lst@lastother\lst@Append}
27 \def\lst@AppendLetter{%
29 \lst@ifkanji\lst@Output\lst@kanjifalse
32 \lst@lettertrue\lst@ifkanji\lst@kanjifalse\else\lst@OutputOther\fi
36 \def\lst@ProcessJALetter{\lst@whitespacefalse \lst@AppendJALetter}
37 \def\lst@ProcessJALetterHalf{\lst@whitespacefalse \lst@AppendJALetterHalf}
38 \def\lst@ProcessJALetter@inhibit@prebreak{%
39 \lst@whitespacefalse \lst@AppendJALetter@inhibit@prebreak}
40 \def\lst@ProcessJALetter@inhibit@postbreak{%
41 \lst@whitespacefalse \lst@AppendJALetter@inhibit@postbreak}
43 \def\lst@AppendJALetter{%
47 \lst@ifkanji\else\lst@OutputOther\fi\lst@lettertrue
49 \advance\lst@length\@ne\lst@Append}
50 \def\lst@AppendJALetterHalf{%
54 \lst@ifkanji\else\lst@OutputOther\fi\lst@lettertrue
57 \def\lst@AppendJALetter@inhibit@prebreak{%
58 \lst@ifletter\else\lst@lettertrue\fi\lst@kanjitrue
59 \advance\lst@length\@ne\lst@Append}
60 \def\lst@AppendJALetter@inhibit@postbreak{%
64 \lst@ifkanji\else\lst@OutputOther\fi
65 \fi\lst@letterfalse\lst@kanjitrue
66 \advance\lst@length\@ne\lst@Append}
69 % loading lltjp-listing-jpt.tex
70 \def\ltj@@listing@jpset#1#2{% fast: #2-#1+1 must be a multiple of 16
71 \@tempcnta=#1 \@tempcntb=#2 \@temptokena{}%
72 \loop\relax\ifnum\@tempcnta<\@tempcntb\relax
73 \ltj@@listing@jpset@\global\advance\@tempcnta\sixt@@n\repeat
74 \ltj@@listing@jpset@after{#1}
76 \def\ltj@@listing@jpsetN#1#2#3{% for (not large) range
77 \@tempcnta=#1 \@tempcntb=#2 \@temptokena{}%
78 \loop \global\advance\@tempcnta\@ne\ifnum\@tempcnta<\@tempcntb\relax
79 \ltj@@listing@jpsetN@{\@tempcnta}{#3}\repeat
80 \ltj@@listing@jpset@after{#1}
83 \def\ltj@@listing@jpset@after#1{%
84 \expandafter\edef\csname ltj@@listing@jpcmd@i#1\endcsname{\the\@temptokena}%
85 \toks@\expandafter\expandafter\expandafter\expandafter%
86 \expandafter\expandafter\expandafter{\expandafter\expandafter%
87 \expandafter\the\expandafter\toks@\csname ltj@@listing@jpcmd@i#1\endcsname}%
92 \catcode`\^^a0=13\catcode`\^^a1=13\catcode`\^^a2=13\catcode`\^^a3=13
93 \catcode`\^^a4=13\catcode`\^^a5=13\catcode`\^^a6=13\catcode`\^^a7=13
94 \catcode`\^^a8=13\catcode`\^^a9=13\catcode`\^^aa=13\catcode`\^^ab=13
95 \catcode`\^^ac=13\catcode`\^^ad=13\catcode`\^^ae=13\catcode`\^^af=13
96 \catcode`\^^b0=12\catcode`\^^b1=12\catcode`\^^b2=12\catcode`\^^b3=12
97 \catcode`\^^b4=12\catcode`\^^b5=12\catcode`\^^b6=12\catcode`\^^b7=12
98 \catcode`\^^b8=12\catcode`\^^b9=12\catcode`\^^ba=12\catcode`\^^bb=12
99 \catcode`\^^bc=12\catcode`\^^bd=12\catcode`\^^be=12\catcode`\^^bf=12
100 \gdef\ltj@@listing@jpset@{%
101 {\lccode`\^^a0=\@tempcnta \lccode`\^^b0=\@tempcnta
102 \advance\@tempcnta\@ne\lccode`\^^a1=\@tempcnta \lccode`\^^b1=\@tempcnta
103 \advance\@tempcnta\@ne\lccode`\^^a2=\@tempcnta \lccode`\^^b2=\@tempcnta
104 \advance\@tempcnta\@ne\lccode`\^^a3=\@tempcnta \lccode`\^^b3=\@tempcnta
105 \advance\@tempcnta\@ne\lccode`\^^a4=\@tempcnta \lccode`\^^b4=\@tempcnta
106 \advance\@tempcnta\@ne\lccode`\^^a5=\@tempcnta \lccode`\^^b5=\@tempcnta
107 \advance\@tempcnta\@ne\lccode`\^^a6=\@tempcnta \lccode`\^^b6=\@tempcnta
108 \advance\@tempcnta\@ne\lccode`\^^a7=\@tempcnta \lccode`\^^b7=\@tempcnta
109 \advance\@tempcnta\@ne\lccode`\^^a8=\@tempcnta \lccode`\^^b8=\@tempcnta
110 \advance\@tempcnta\@ne\lccode`\^^a9=\@tempcnta \lccode`\^^b9=\@tempcnta
111 \advance\@tempcnta\@ne\lccode`\^^aa=\@tempcnta \lccode`\^^ba=\@tempcnta
112 \advance\@tempcnta\@ne\lccode`\^^ab=\@tempcnta \lccode`\^^bb=\@tempcnta
113 \advance\@tempcnta\@ne\lccode`\^^ac=\@tempcnta \lccode`\^^bc=\@tempcnta
114 \advance\@tempcnta\@ne\lccode`\^^ad=\@tempcnta \lccode`\^^bd=\@tempcnta
115 \advance\@tempcnta\@ne\lccode`\^^ae=\@tempcnta \lccode`\^^be=\@tempcnta
116 \advance\@tempcnta\@ne\lccode`\^^af=\@tempcnta \lccode`\^^bf=\@tempcnta
117 \lowercase{\gdef\@temp{%
118 \gdef^^a0{\lst@ProcessJALetter^^b0}\gdef^^a1{\lst@ProcessJALetter^^b1}%
119 \gdef^^a2{\lst@ProcessJALetter^^b2}\gdef^^a3{\lst@ProcessJALetter^^b3}%
120 \gdef^^a4{\lst@ProcessJALetter^^b4}\gdef^^a5{\lst@ProcessJALetter^^b5}%
121 \gdef^^a6{\lst@ProcessJALetter^^b6}\gdef^^a7{\lst@ProcessJALetter^^b7}%
122 \gdef^^a8{\lst@ProcessJALetter^^b8}\gdef^^a9{\lst@ProcessJALetter^^b9}%
123 \gdef^^aa{\lst@ProcessJALetter^^ba}\gdef^^ab{\lst@ProcessJALetter^^bb}%
124 \gdef^^ac{\lst@ProcessJALetter^^bc}\gdef^^ad{\lst@ProcessJALetter^^bd}%
125 \gdef^^ae{\lst@ProcessJALetter^^be}\gdef^^af{\lst@ProcessJALetter^^bf}%
126 }}%\message{\meaning\@temp}%
128 \@temptokena\expandafter\expandafter\expandafter\expandafter%
129 \expandafter\expandafter\expandafter{\expandafter\expandafter%
130 \expandafter\the\expandafter\@temptokena\@temp}%
132 \gdef\ltj@@listing@jpsetN@#1#2{{%
133 \@tempcnta=#1 \lccode`\~=\@tempcnta \lccode`\/=\@tempcnta
134 \lowercase{\gdef\@temp{\gdef~{#2/}}}}%
135 \@temptokena\expandafter\expandafter\expandafter\expandafter%
136 \expandafter\expandafter\expandafter{\expandafter\expandafter%
137 \expandafter\the\expandafter\@temptokena\@temp}%
143 \input lltjp-listings-jpt.tex
144 \edef\ltj@@listing@jpcmd{\the\toks@}
146 \lst@AddToHook{Init}{%
147 \luatexcatcodetable\CatcodeTableLTJlistings
152 \def\lst@OutputToken{%
153 \lst@TrackNewLines \lst@OutputLostSpace
155 \lst@gobbledwhitespacefalse
159 {\lst@thestyle{\lst@FontAdjust
160 \setbox\@tempboxa\lst@hbox
163 \expandafter\lst@FillOutputBox\the\lst@token\@empty
165 \ht\@tempboxa=0pt\dp\@tempboxa=0pt
166 \lst@CalcLostSpaceAndOutput}}%
170 % \begin{修正事項}{1.3} from jlisting.sty
172 \gdef\lst@breakProcessOther#1{\lst@ProcessOther#1}
173 % ソースコード目次における文字と番号の空き
174 \let \l@lstlisting = \l@figure
175 % キャプションとソースコード目次に対する日本語対応
176 \def\lstlistingname{ソースコード}
177 \def\lstlistlistingname{ソースコード目次}