<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">% ^^A -*- japanese-latex -*-
%
% \ifx\epTeXinputencoding\undefined\else
%   \epTeXinputencoding utf8 % ^^A added (2017-10-04)
% \fi
%
% \iffalse
%
%&lt;*driver&gt;
\ifx\epTeXinputencoding\undefined\else
  \epTeXinputencoding utf8
\fi
%&lt;/driver&gt;
%
%  jsverb.dtx
%  verb/verbatim 髢｢菫ゅ�繧ｯ繝ｭ (辣ｮ縺ｦ繧ら┥縺�※繧ゅ°縺ｾ縺�∪縺帙ｓ)
%  螂･譚第匐蠖ｦ &lt;okumura@okumuralab.org&gt;
%  http://oku.edu.mie-u.ac.jp/~okumura/
%
%  縲檎�縺ｦ繧ら┥縺�※繧ゅ°縺ｾ縺�∪縺帙ｓ縲阪〒蝗ｰ繧句�ｴ蜷医�modified BSD縺ｨ縺�≧縺薙→縺ｧ縺企｡倥＞縺励∪縺吶�
%
%&lt;jsverb&gt;\NeedsTeXFormat{pLaTeX2e}
%&lt;jsverb&gt;\ProvidesFile{jsverb.sty}[2007/01/28 okumura]
%&lt;*driver&gt;
\RequirePackage{plautopatch}
\documentclass[dvipdfmx]{jsarticle}
\usepackage{doc}
\xspcode"5C=1 %% \
\xspcode"22=1 %% "
\usepackage{okumacro}
\usepackage{jsverb}
\addtolength{\textwidth}{-1in}
\addtolength{\evensidemargin}{1in}
\addtolength{\oddsidemargin}{1in}
\addtolength{\marginparwidth}{1in}
\setlength\marginparsep{5pt}
\setlength\marginparpush{0pt}
% \OnlyDescription
\CodelineNumbered
\DisableCrossrefs
\setcounter{StandardModuleDepth}{1}
\GetFileInfo{jsverb.sty}
\begin{document}
  \DocInput{jsverb.dtx}
\end{document}
%&lt;/driver&gt;
%
% \fi
%
% \title{\pLaTeXe 逕ｨ \texttt{verb...} 髢｢菫ゅ�繧ｯ繝ｭ}
% \author{螂･譚第匐蠖ｦ}
% \date{\filedate}
% \maketitle
%
% \StopEventually{}
%
% \MakeShortVerb{\|}
%
% 譌ｧ |okuverb| 縺ｯ\LaTeX 縺ｮ |\verb| 蜻ｽ莉､縺ｨ |verbatim| 迺ｰ蠅�ｒ諡｡蠑ｵ縺励◆繧ゅ�縺ｧ��
% |yen| 繧ｪ繝励す繝ｧ繝ｳ繧剃ｻ倥￠繧九→ \ttbslash\ 縺� \ttyen\ 縺ｫ縺ｪ繧九⊇縺具ｼ芸verbatim| 迺ｰ蠅��
% 邨�∩譁ｹ繧堤ｰ｡蜊倥↓繧ｫ繧ｹ繧ｿ繝槭う繧ｺ縺ｧ縺阪ｋ繧医≧縺ｫ縺励◆繧ゅ�縺ｧ縺吶�
%
% 荳譁ｹ�圭TeX 縺ｧ縺ｯASCII |0x60|縺ｮ |`| 縺ｨ|0x27|縺ｮ |'| 繧貞�蜉帙☆繧九→
% 縺昴ｌ縺槭ｌ \texttt{`} 縺ｨ \texttt{'} 縺ｫ縺ｪ繧翫∪縺吶�
% 縺薙ｌ繧峨�譁�ｭ励→縺励※縺ｯ縺昴ｌ縺槭ｌ
% U+2018 LEFT SINGLE QUOTATION MARK��
% U+2019 RIGHT SINGLE QUOTATION MARK縺ｧ縺吶�縺ｧ��
% dvipdfmx縺ｧPDF縺ｫ螟画鋤縺励※譌･譛ｬ隱槭ユ繧ｭ繧ｹ繝医↓繧ｳ繝斐����繝ｼ繧ｹ繝医☆繧九→��
% 蜈ｨ隗呈枚蟄励↓縺ｪ縺｣縺ｦ縺励∪縺�∪縺吶�
% |\verb| 繧� |verbatim| 縺ｯ繝励Ο繧ｰ繝ｩ繝�繝ｪ繧ｹ繝医↓繧医￥逕ｨ縺�ｋ縺ｮ縺ｧ��
% 諢丞峙縺ｨ縺励※縺ｯ縺昴ｌ縺槭ｌU+0060 GRAVE ACCENT�袈+0027 APOSTROPHE縺ｫ
% 縺ｪ縺｣縺ｦ縺ｻ縺励＞縺ｨ諤昴＞縺ｾ縺吶�
% 縺昴％縺ｧ�兄R縺輔ｓ縺ｮ縺泌勧險
% \begin{itemize}
% \item |http://oku.edu.mie-u.ac.jp/~okumura/texfaq/qa/46673.html|
% \item |http://oku.edu.mie-u.ac.jp/~okumura/texfaq/qa/46688.html|
% \end{itemize}
% 縺ｫ縺励◆縺後▲縺ｦ譌ｧ |okuverb| 繧貞､ｧ蟷�↓譖ｸ縺咲峩縺励◆繧ゅ�縺後％縺ｮ |jsverb| 縺ｧ縺吶�
% 
% 縺ｪ縺奇ｼ圭ttyen\ 繧偵さ繝斐����繝ｼ繧ｹ繝医＠縺溷�ｴ蜷医���
% OT1繧ｨ繝ｳ繧ｳ繝ｼ繝�ぅ繝ｳ繧ｰ縺ｧ菴ｿ縺医� Y= 縺ｨ縺�≧2譁�ｭ励↓��
% T1繧ｨ繝ｳ繧ｳ繝ｼ繝�ぅ繝ｳ繧ｰ縺ｧ菴ｿ縺医�U+00A5 YEN SIGN縺ｫ縺ｪ繧翫∪縺吶�
% 繝舌ャ繧ｯ繧ｹ繝ｩ繝�す繝･��U+005C REVERSE SOLIDUS�峨↓縺励◆縺��ｴ蜷医� \ttbslash\
% 縺ｮ縺ｻ縺�ｒ縺贋ｽｿ縺�￥縺�縺輔＞縲�
% 
% 縺ｪ縺奇ｼ芸doc.sty| 縺梧署萓帙☆繧� |macrocode| 迺ｰ蠅��譖ｸ縺肴鋤縺医※縺�∪縺帙ｓ縺ｮ縺ｧ��
% 莉･荳九�繝ｪ繧ｹ繝医〒縺ｯ |` '| 縺� \texttt{` '} 縺ｫ縺ｪ縺｣縺ｦ縺�∪縺吶�
% 
% [2008-01-05] |http://www.cl.cam.ac.uk/~mgk25/ucs/quotes.html|
% 縺悟盾閠�↓縺ｪ繧翫∪縺吶�|upquote.sty| 縺ｨ縺�≧繧ゅ�繧ゅ≠繧翫∪縺励◆縲�
%
% 莉･荳九�蜀�Κ縺ｮ隗｣隱ｬ縺ｧ縺吶�
% 
% 縺ｾ縺壹が繝励す繝ｧ繝ｳ縺ｮ螳｣險縺ｧ縺吶�
%
% \begin{macro}{\if@yen}
%
% |\verb|�芸verbatim| 遲峨〒 |\| 繧貞�蜊ｰ \ttyen\ 縺ｫ縺吶ｋ縺九←縺�°縺ｮ繧ｹ繧､繝�メ縺ｧ縺吶�
% 縺薙ｌ縺ｯ繝�ヵ繧ｩ繝ｼ繝ｫ繝医〒蛛ｽ縺ｧ縺吶′�芸yen| 繧ｪ繝励す繝ｧ繝ｳ縺ｧ逵溘↓縺ｪ繧翫∪縺吶�
%
%    \begin{macrocode}
%&lt;*jsverb&gt;
\newif\if@yen \@yenfalse
\DeclareOption{yen}{\@yentrue}
\ProcessOptions\relax
%    \end{macrocode}
%
% \end{macro}
%
% T1繧剃ｽｿ縺��縺ｫTS1縺後↑縺��ｴ蜷医�蟇ｾ蜃ｦ縺ｧ縺吶�
% |textcomp.sty| 縺ｯ蜑ｯ菴懃畑縺後≠繧九�縺ｧ |ts1enc.def|
% 繧定ｪｭ縺ｿ霎ｼ繧縺�縺代↓縺励※縺�∪縺呻ｼ医％繧後�隍�焚蝗櫁ｪｭ縺ｿ霎ｼ繧薙〒繧�
% 蝠城｡後↑縺輔◎縺�〒縺呻ｼ峨�
%
%    \begin{macrocode}
\AtBeginDocument{%
  \expandafter\ifx\csname T@T1\endcsname\relax \else
    \expandafter\ifx\csname T@TS1\endcsname\relax
      \input{ts1enc.def}%
  \fi\fi
}
%    \end{macrocode}
%
% \begin{macro}{\y@n}
% \begin{macro}{\ttyen}
%
% 邁｡蜊倥↑蜀�ｨ伜捷縺ｮ螳夂ｾｩ縺ｧ縺吶ょｾ後〒T1繧ｨ繝ｳ繧ｳ繝ｼ繝�ぅ繝ｳ繧ｰ縺ｮ蝣ｴ蜷医�蜀榊ｮ夂ｾｩ縺励∪縺吶�
%
%    \begin{macrocode}
\def\y@n{Y\llap=}
\def\ttyen{{\ttfamily\y@n}}
%    \end{macrocode}
%
% \end{macro}
% \end{macro}
%
% \begin{macro}{\ttbslash}
%
% 繧ｿ繧､繝励Λ繧､繧ｿ繝輔か繝ｳ繝医�繝舌ャ繧ｯ繧ｹ繝ｩ繝�す繝･縺ｧ縺吶�
%
%    \begin{macrocode}
\def\ttbslash{{\ttfamily\char`\\}}
%    \end{macrocode}
%
% \end{macro}
%
% \begin{macro}{\BS}
%
% 繧ｿ繧､繝励Λ繧､繧ｿ繝輔か繝ｳ繝医�蜀�ｨ伜捷縺九ヰ繝�け繧ｹ繝ｩ繝�す繝･縺ｮ縺ｩ縺｡繧峨°縺ｫ縺ｪ繧翫∪縺吶�
%
%    \begin{macrocode}
\if@yen
  \let\BS=\ttyen
\else
  \let\BS=\ttbslash
\fi
%    \end{macrocode}
%
% \end{macro}
%
% \begin{macro}{\verbh@@k}
%
% |\verb|�芸verbatim| 遲峨〒菴ｿ縺�ヵ繝�け縺ｧ縺吶�
%
%    \begin{macrocode}
\if@yen
  \begingroup
    \catcode`\|=0  \catcode`\\=13
    |gdef|verbh@@k{|catcode`|\=13 |let\=|y@n}
  |endgroup
\else
  \let\verbh@@k=\relax
\fi
%    \end{macrocode}
%
% \end{macro}
%
% \begin{macro}{\verbh@@@k}
% \begin{macro}{\verbh@@@k@}
%
% 縺輔ｉ縺ｪ繧九ヵ繝�け縺ｧ縺吶�
%
%    \begin{macrocode}
\begingroup
  \catcode`\'=13
  \catcode`\`=13
  \gdef\verbh@@@k{\catcode39=13 \let'=\@rq \catcode96=13 \let`=\@lq}
\endgroup
\def\@OTone{OT1}
\def\@Tone{T1}
\def\verbh@@@k@{%
  \ifx\f@encoding\@OTone
    \chardef\@lq=18
    \chardef\@rq=13
    \verbh@@@k
  \else
    \ifx\f@encoding\@Tone
      \chardef\@lq=0
      \def\@rq{{\fontencoding{TS1}\selectfont\textquotesingle}}%
      \def\y@n{{\fontencoding{TS1}\selectfont\textyen}}%
      \verbh@@@k
    \fi
  \fi
}
%    \end{macrocode}
%
% \end{macro}
% \end{macro}
%
% \begin{macro}{\verbatim@font}
%
% 縺薙ｌ縺ｯ |latex.ltx| 縺ｫ |\normalfont\ttfamily|
% 縺ｨ螳夂ｾｩ縺輔ｌ縺ｦ縺�∪縺吶′�芸\bfseries| |\verb...| 縺ｨ縺�▲縺滉ｽｿ縺�婿繧ゅ＠縺溘＞縺ｮ縺ｧ��
% |\normalfont| 縺ｯ蜑企勁縺励※縺励∪縺�∪縺励◆縲�
%
%    \begin{macrocode}
\def\verbatim@font{\ttfamily}
%    \end{macrocode}
%
% \end{macro}
%
% \begin{macro}{\verb}
%
% 蜈��謨ｰ蠑上Δ繝ｼ繝画凾縺�縺� |\hbox| 縺ｫ蜈･繧九ｈ縺�↓縺ｪ縺｣縺ｦ縺�∪縺励◆縺鯉ｼ�
% |\noautoxspacing| 縺ｮ蜉ｹ譫懊ｒ蠕励ｋ縺溘ａ�悟ｸｸ縺ｫ |\hbox| 縺ｫ蜈･繧九ｈ縺�↓縺励∪縺励◆縲�
%
%    \begin{macrocode}
\def\verb{%
  \leavevmode\hbox
  \bgroup
    \verb@eol@error \let\do\@makeother \dospecials
    \verbatim@font\@noligs
    \noautoxspacing
    \verbh@@k \verbh@@@k@
    \@ifstar\@sverb\@verb}
%    \end{macrocode}
%
% \end{macro}
%
% \begin{macro}{\@xverbatim}
% \begin{macro}{\@sxverbatim}
%
% |\| 縺ｮ |\catcode| 繧�12縺九ｉ13縺ｫ螟峨∴縺ｾ縺励◆縲�
%
%    \begin{macrocode}
\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
%    \end{macrocode}
%
% \end{macro}
% \end{macro}
%
% \begin{macro}{\verbatimleftmargin}
%
% |verbatim| 迺ｰ蠅��菴吝�縺ｪ蟾ｦ繝槭�繧ｸ繝ｳ縺ｧ縺吶�
% 譁�嶌繝輔ぃ繧､繝ｫ荳ｭ縺ｪ縺ｩ縺ｧ閾ｪ逕ｱ縺ｫ蜀榊ｮ夂ｾｩ縺励※縺上□縺輔＞縲�
%
%    \begin{macrocode}
\newdimen\verbatimleftmargin
\verbatimleftmargin=2zw
%    \end{macrocode}
%
% \end{macro}
%
% \begin{macro}{\verbatimsize}
%
% |verbatim| 迺ｰ蠅��繝輔か繝ｳ繝医し繧､繧ｺ縺ｧ縺吶�
% 譁�嶌繝輔ぃ繧､繝ｫ荳ｭ縺ｪ縺ｩ縺ｧ閾ｪ逕ｱ縺ｫ蜀榊ｮ夂ｾｩ縺励※縺上□縺輔＞縲�
%
%    \begin{macrocode}
\def\verbatimsize{\fontsize{9}{11pt}\selectfont}
%    \end{macrocode}
%
% \end{macro}
%
% \begin{macro}{\@verbatim}
%
% |verbatim| 迺ｰ蠅�〒菴ｿ縺�ヵ繧ｩ繝ｳ繝医�陦碁√ｊ縺ｨ繧ｵ繧､繧ｺ��|\f@size|�峨′
% 譛ｬ譁�→驕輔≧縺ｨ�悟燕蠕後�髢馴囈縺碁＆縺｣縺ｦ縺励∪縺�∪縺吶ゅ◎繧後ｒ陬懈ｭ｣縺励∪縺吶�
%
%    \begin{macrocode}
\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 \@noligs
  \noautoxspacing
  \verbh@@k \verbh@@@k@
  \hyphenchar\font\m@ne
  \everypar \expandafter{\the\everypar \unpenalty}%
}
%    \end{macrocode}
%
% \end{macro}
%
% 莉･荳翫〒邨ゅｏ繧翫〒縺吶�
%
%    \begin{macrocode}
%&lt;/jsverb&gt;
\endinput
%    \end{macrocode}
%
% \Finale
</pre></body></html>