codedoc update (27jun09)

git-svn-id: svn://tug.org/texlive/trunk@13984 c570f23f-e606-0410-a88d-b1316a301751

4 files changed, 61 insertions, 11 deletions

diff --git a/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.pdf b/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.pdf
index 3f78a83663c..9c30f78b9c0 100644
--- a/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.pdf
+++ b/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.pdf
diff --git a/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.tex b/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.tex
index e0d76d10c7f..b228ab15714 100644
--- a/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.tex
+++ b/Master/texmf-dist/doc/latex/codedoc/CodeDoc-manual.tex
@@ -4,7 +4,7 @@
 \documentclass[article(a4paper),
 index,% Comment this out if you don't want an index
 %obeystop,% Uncomment this if you don't want to print the implementation
-%produce,% Uncomment this to produce 'codedoc.cls'
+produce,% Uncomment this to produce 'codedoc.cls'
 ]{codedoc}
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -181,7 +181,7 @@ zappathustra@free.fr
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%}
 
-\ProduceFile{codedoc.cls}[codedoc][v.0.1][\the\year/\month/\day]
+\ProduceFile{codedoc.cls}[codedoc][v.0.2][\the\year/\month/\day]
 \AddBlankLine\AddBlankLine\AddBlankLine
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -329,6 +329,19 @@ And, oh, yeah, some ideas are mine, too.
 \thispagestyle{empty}
 \pagebreak
 
+\strut\vfill
+\noindent\hfil\fbox{\begin{minipage}{13cm}
+\noindent\textbf{Changes in version 0.2}
+
+$\Rightarrow$ Bug fix to make "\bslash ref" work properly in
+the unmodified "code" environment.
+
+$\Rightarrow$ Files "\bslash input" and read in "produce" mode
+won't produce error messages anymore... at least with \eTeX.
+\end{minipage}}
+\thispagestyle{empty}
+\pagebreak
+
 \strut\vfil
 \tableofcontents
 \vfil
@@ -2529,7 +2542,7 @@ of "\NewExample" below.
 \def\code@cd@BoxStyle{\rmfamily\footnotesize}
 \gdef\code@cd@LineNumberBox{%
 	\global\advance\code@cd@LineNumber1\relax%
-	\def\@currentlabel{\code@cd@LineNumber}%
+	\def\@currentlabel{\the\code@cd@LineNumber}%
 	\hbox to\code@cd@boxwidth{%
 	\hss%
 	\code@cd@BoxStyle\relax%
@@ -3125,11 +3138,11 @@ an external scratch file for example processing.
 equivalent to the one described above for the default "code"
 environment, except that each line is written to the
 external file. We launch it on the material suffixed
-with a complicated tail to match all cases. 
+with a complicated tail to match all cases. \tracingcommands2 \tracingmacros2 
 /
 			\let^^M\cd@noeTeXEOL%
 			^^M##2^^?^^M^^?%§label¤eol£
-/
+/\tracingcommands0 \tracingmacros0
 
 \noindent Finally, we close everything and assign input
 once again.
@@ -4251,8 +4264,12 @@ We'll need these presently.
 /\AddBlankLine
 
 Here comes the macros that take their arguments
-bewteen braces of category 12.
+bewteen braces of category 12. The "\if..." will be needed
+in "\input@Produce".
 /
+\newif\ifcd@everyeof
+\cd@everyeoftrue
+
 \begingroup
 \catcode`\{=12 %
 \catcode`\}=12 %
@@ -4356,9 +4373,29 @@ tracked back to their source. Besides, "\input" in
 \TeX's way, i.e. without braces, is not allowed anymore,
 if it is to be read by \CD\ in produce mode. I feel
 like removing the whole thing altogether.
+
+Lines \ref{eof1} to \ref{eof2} were added in version 0.2.
+I had overlooked the fact that if an "\input" file ended
+with a control sequence, then the rather complicated mechanism
+of "\cd@Gather" and its friends would run into the end of
+the file and produce an error message. With good ol' \TeX, I
+don't know how to overcome this; hence the warning.
+With \eTeX, however, I use "\everyeof" to add a pair of
+braces just for the sake of some harmless tokens.
+Anyway, who's using \TeX\ anymore?
 /
 \newcount\cd@InputDepth
 \gdef\input@Produce{#1}<
+  \ifcd@everyeof§label¤eof1£
+    \cd@everyeoffalse
+    \ifx\everyeof\@undefined
+      \cd@CDWarning<%
+        You're not running on e-TeX; the \string\input\space of files might be problematic.%
+        ^^JAdd `{}' at the end of \string\input\space files if you ever get a `File ended...' ¨message>
+    \else
+      \everyeof<{}>
+    \fi
+  \fi§label¤eof2£
 	\cd@Tracing<\string\input\space file #1>
 	\expandafter\let\csname cd@MasterSource\the\cd@InputDepth\endcsname\cd@CurrentSource
 	\edef\cd@CurrentSource<#1 (\string\input\space in \cd@CurrentSource)>
diff --git a/Master/texmf-dist/doc/latex/codedoc/README b/Master/texmf-dist/doc/latex/codedoc/README
index 09e5667b32b..1d598b7d836 100644
--- a/Master/texmf-dist/doc/latex/codedoc/README
+++ b/Master/texmf-dist/doc/latex/codedoc/README
@@ -1,4 +1,4 @@
-This is the file README for the CodeDoc class, v.0.1.
+This is the file README for the CodeDoc class, v.0.2.
 You'll find complete documentation in CodeDoc-manual.pdf
 
 This class produces code and documentation in a single file without departing from LaTeX's ordinary
diff --git a/Master/texmf-dist/tex/latex/codedoc/codedoc.cls b/Master/texmf-dist/tex/latex/codedoc/codedoc.cls
index 956226048ff..3bdbda4d194 100644
--- a/Master/texmf-dist/tex/latex/codedoc/codedoc.cls
+++ b/Master/texmf-dist/tex/latex/codedoc/codedoc.cls
@@ -3,8 +3,8 @@
 % This is the CodeDoc class, produced by itself
 % with the `produce' option on, from `CodeDoc-manual.tex'.
 % 
-% Date: 2009/04/01
-% Version: v.0.1
+% Date: 2009/06/27
+% Version: v.0.2
 % Author: Paul Isambert
 % 
 % The documentation can be found in `CodeDoc-manual.pdf'
@@ -25,7 +25,7 @@
 
 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesClass{codedoc}[2009/04/01 v.0.1 Code and documentation in one file.]
+\ProvidesClass{codedoc}[2009/06/27 v.0.2 Code and documentation in one file.]
 \makeatletter
 \catcode`\^^?=13
 
@@ -498,7 +498,7 @@ to\cd@TabSize\fontdimen2\font{\hss}%
 \def\code@cd@BoxStyle{\rmfamily\footnotesize}
 \gdef\code@cd@LineNumberBox{%
 	\global\advance\code@cd@LineNumber1\relax%
-	\def\@currentlabel{\code@cd@LineNumber}%
+	\def\@currentlabel{\the\code@cd@LineNumber}%
 	\hbox to\code@cd@boxwidth{%
 	\hss%
 	\code@cd@BoxStyle\relax%
@@ -1314,6 +1314,9 @@ to\cd@TabSize\fontdimen2\font{\hss}%
 \def\cd@InvisibleString{invisible}
 \def\cd@StoredEnvironments{example,verbatim,Verbatim,BVerbatim,LVerbatim,SaveVerbatim,VerbatimOut,Example,CenterExample,SideBySideExample,PCenterExample,PSideBySideExample,}
 
+\newif\ifcd@everyeof
+\cd@everyeoftrue
+
 \begingroup
 \catcode`\{=12 %
 \catcode`\}=12 %
@@ -1362,6 +1365,16 @@ to\cd@TabSize\fontdimen2\font{\hss}%
 
 \newcount\cd@InputDepth
 \gdef\input@Produce{#1}<
+  \ifcd@everyeof
+    \cd@everyeoffalse
+    \ifx\everyeof\@undefined
+      \cd@CDWarning<%
+        You're not running on e-TeX; the \string\input\space of files might be problematic.%
+        ^^JAdd `{}' at the end of \string\input\space files if you ever get a `File ended...' message>
+    \else
+      \everyeof<{}>
+    \fi
+  \fi
 	\cd@Tracing<\string\input\space file #1>
 	\expandafter\let\csname cd@MasterSource\the\cd@InputDepth\endcsname\cd@CurrentSource
 	\edef\cd@CurrentSource<#1 (\string\input\space in \cd@CurrentSource)>