Re: \write と \bgroup

名前: トノ
日時: 2004-08-31 12:37:32
IPアドレス: 150.35.254.*

>>31180

多分、こんな感じでいいのではないかと‥‥

※  moreverb.sty の verbatimwrite 環境の改変版として verbatimout 環境を
    定義してみました

\documentclass{article}

\usepackage{moreverb}\relax
\makeatletter
    \newwrite\verbatimoutstream
    \immediate\openout\verbatimoutstream\jobname.out
    \typeout{\meaning\verbatimoutstream}
    \AtEndDocument{\closeout\verbatimoutstream}
    \def\verbatimout{%
      \@bsphack
      \let\do\@makeother\dospecials
      \catcode`\^^M\active \catcode`\^^I=12
      \def\verbatim@processline{%
        \immediate\write\verbatimoutstream
          {\the\verbatim@line}}%
      \verbatim@start}
    \def\endverbatimout{%
      \@esphack}
\makeatother

\begin{document}
abc
\begin{verbatimout}
verbatimout environment ~^\controlword
&{
\end{verbatimout}
def
\begin{verbatimout}
#}%$
\end{verbatimout}
ghi
\end{document}

この書き込みへの返事：