blob: 872b56135706bec29eab4bc20ce5eae6cf567efb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
|
%%
%% This is file `okuverb.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% okuverb.dtx (with options: `okuverb')
%%
%% IMPORTANT NOTICE:
%%
%% For the copyright see the source file.
%%
%% Any modified versions of this file must be renamed
%% with new filenames distinct from okuverb.sty.
%%
%% For distribution of the original source see the terms
%% for copying and modification in the file okuverb.dtx.
%%
%% This generated file may be distributed as long as the
%% original source files, as listed above, are part of the
%% same distribution. (The sources need not necessarily be
%% in the same archive or directory.)
\NeedsTeXFormat{pLaTeX2e}
\ProvidesFile{okuverb.sty}[2003/09/03 okumura]
\newif\if@yen \@yenfalse
\DeclareOption{yen}{\@yentrue}
\ProcessOptions\relax
\DeclareRobustCommand{\yen}{{\ooalign{Y\crcr\hss=\hss}}}
\def\y@n{Y\llap=}
\def\ttyen{{\ttfamily\y@n}}
\def\ttbslash{{\ttfamily\char`\\}}
\if@yen
\let\BS=\ttyen
\else
\let\BS=\ttbslash
\fi
\if@yen
\begingroup
\catcode`\|=0 \catcode`\\=13
|gdef|verbh@@k{|catcode`|\=13 |let\=|y@n}
|endgroup
\else
\let\verbh@@k=\relax
\fi
\def\verbatim@font{\ttfamily}
\def\verb{%
\leavevmode\hbox % 変更
\bgroup
\verb@eol@error \let\do\@makeother \dospecials
\verbatim@font\@noligs
\noautoxspacing % 追加
\verbh@@k % 追加
\@ifstar\@sverb\@verb}
\if@yen
\begingroup \catcode `|=0 \catcode `[= 1
\catcode`]=2 \catcode `\{=12 \catcode `\}=12
\catcode`\\=13 |gdef|@xverbatim#1\end{verbatim}[#1|end[verbatim]]
|gdef|@sxverbatim#1\end{verbatim*}[#1|end[verbatim*]]
|endgroup
\fi
\newdimen\verbatimleftmargin
\verbatimleftmargin=2zw
\def\verbatimsize{\fontsize{9}{11pt}\selectfont}
\def\@verbatim{%
\trivlist \item\relax
\if@minipage
\verbatimsize
\else
\vskip\baselineskip
\vskip-\f@size pt
\verbatimsize
\vskip-\baselineskip
\vskip\f@size pt
\vskip\parskip
\fi
\leftskip\@totalleftmargin
\if@minipage \else
\advance \leftskip \verbatimleftmargin
\fi
\rightskip\z@skip
\parindent\z@
\parfillskip\@flushglue
\parskip\z@skip
\@@par
\@tempswafalse
\def\par{%
\if@tempswa
\leavevmode \null \@@par\penalty\interlinepenalty
\else
\@tempswatrue
\ifhmode\@@par\penalty\interlinepenalty\fi
\fi}%
\let\do\@makeother \dospecials
\obeylines \verbatim@font
\noautoxspacing \verbh@@k
\@noligs
\hyphenchar\font\m@ne
\everypar \expandafter{\the\everypar \unpenalty}%
}
\endinput
%%
%% End of file `okuverb.sty'.
|