%% %% This is file `catchfile-test2.tex', %% generated with the docstrip utility. %% %% The original source files were: %% %% catchfile.dtx (with options: `test2') %% %% This is a generated file. %% %% Project: catchfile %% Version: 2011/03/01 v1.6 %% %% Copyright (C) 2007, 2010, 2011 by %% Heiko Oberdiek %% %% This work may be distributed and/or modified under the %% conditions of the LaTeX Project Public License, either %% version 1.3c of this license or (at your option) any later %% version. This version of this license is in %% http://www.latex-project.org/lppl/lppl-1-3c.txt %% and the latest version of this license is in %% http://www.latex-project.org/lppl.txt %% and version 1.3 or later is part of all distributions of %% LaTeX version 2005/12/01 or later. %% %% This work has the LPPL maintenance status "maintained". %% %% This Current Maintainer of this work is Heiko Oberdiek. %% %% The Base Interpreter refers to any `TeX-Format', %% because some files are installed in TDS:tex/generic//. %% %% This work consists of the main source file catchfile.dtx %% and the derived files %% catchfile.sty, catchfile.pdf, catchfile.ins, catchfile.drv, %% catchfile-test1.tex, catchfile-test2.tex, %% catchfile-test3.tex. %% \NeedsTeXFormat{LaTeX2e} \nofiles \listfiles \tracingnesting=2 % \documentclass{minimal} \usepackage{catchfile}[2011/03/01] \makeatletter \def\mysetup{% \let\do\@makeother \dospecials } \def\CheckContents{% \begingroup \expandafter\ifx\csname contents\endcsname\relax \PackageError{TEST}{\string\contents\space is not defined}\@ehc \fi \endgroup } \def\StartDisableUnexpanded{% \begingroup \let\etex@unexpanded\@undefined } \def\StopDisableUnexpanded{% \endgroup } \def\CheckCleanup{% \begingroup \edef\x{\the\toks0}% \def\y{ABC}% \ifx\x\y \else \PackageError{TEST}{\string\toks0 has changed}\@ehc \fi \ifx\CatchFile@gtemp\@undefined \else \PackageError{TEST}{Left over \string\CatchFile@gtemp}\@ehc \fi \endgroup } \def\Check{% \CheckContents \CheckCleanup } \makeatother \begin{document} \toks0{ABC} \CatchFileDef\contents{catchfile.sty}\mysetup \typeout{\meaning\contents} \Check \typeout{***********************************************************}% \CatchFileDef\contents{catchfile.sty}{} \typeout{\meaning\contents} \Check \typeout{***********************************************************}% \StartDisableUnexpanded \CatchFileDef\contents{catchfile.sty}\mysetup \typeout{\meaning\contents} \Check \typeout{***********************************************************}% \CatchFileDef\contents{catchfile.sty}{} \typeout{\meaning\contents} \Check \typeout{***********************************************************}% \StopDisableUnexpanded \CatchFileEdef\contents{catchfile.sty}{% \mysetup \def\par{^^J}% \obeylines } \typeout{\contents} \Check \typeout{***********************************************************}% \CatchFileEdef\contents{catchfile.sty}{% \catcode`\\=12 % \catcode`\#=12 % \def\par{^^J}% \obeylines } \typeout{\contents} \Check \typeout{***********************************************************}% \end{document} \endinput %% %% End of file `catchfile-test2.tex'.