% S_Verbatim.TeX Macro
%
% macros for verbatim scanning
\chardef\other=12
\newskip\ttglue
\ttglue=.5em plus.25em minus.15em
\def\ttverbatim{\begingroup
  \catcode`\\=\other
  \catcode`\{=\other
  \catcode`\}=\other
  \catcode`\$=\other
  \catcode`\&=\other
  \catcode`\#=\other
  \catcode`\%=\other
  \catcode`\_=\other
  \catcode`\^=\other
  \catcode`\"=\other                   % this line is new stuff
  \catcode`\|=\other
  \catcode`\~=\other
  \obeyspaces \obeylines \tt}
 
\catcode`\"=\active
\def"#1{\ttverbatim \spaceskip\ttglue% \let^^M=\
\def\readit##1#1{##1\endgroup}\expandafter\readit}
%
