mirrors/make-dfsg
1
0
Fork 0
mirror of https://salsa.debian.org/srivasta/make-dfsg.git synced 2024-12-26 14:00:56 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

(\doignore): Ignore everything after `c', so @end ifinfo and the like

Browse source 
can be commented out.
(\macrocsname): New macro.
Reported by: "James A. Lupo" <lupoja@feynman.ml.wpafb.af.mil>
This commit is contained in:
Karl Berry 1998-04-01 00:33:30 +00:00
parent 1290679bc3
commit 2fcce1d3b0
1 changed files with 23 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
texinfo.tex
View file

@ -25,8 +25,10 @@
% %
% Please try the latest version of texinfo.tex before submitting bug % Please try the latest version of texinfo.tex before submitting bug
% reports; you can get the latest version from: % reports; you can get the latest version from:
% ftp://ftp.cs.umb.edu/pub/tex/texinfo.tex
% /home/gd/gnu/doc/texinfo.tex on the GNU machines. % /home/gd/gnu/doc/texinfo.tex on the GNU machines.
% ftp://tug.org/tex/texinfo.tex
% ftp://ctan.org/macros/texinfo/texinfo.tex
% (and all CTAN mirrors, finger info@ctan.org for a list).
% %
% Send bug reports to bug-texinfo@gnu.org. % Send bug reports to bug-texinfo@gnu.org.
% Please include a precise test case in each bug report, % Please include a precise test case in each bug report,
@ -772,6 +774,7 @@ where each line of input produces a line of output.}
% Also ignore @macro ... @end macro. The user must run texi2dvi, % Also ignore @macro ... @end macro. The user must run texi2dvi,
% which runs makeinfo to do macro expansion. Ignore @unmacro, too. % which runs makeinfo to do macro expansion. Ignore @unmacro, too.
\def\macro{\doignore{macro}} \def\macro{\doignore{macro}}
\def\macrocsname{macro}
\let\unmacro = \comment \let\unmacro = \comment
@ -786,7 +789,9 @@ where each line of input produces a line of output.}
\ignoresections \ignoresections
% %
% Define a command to swallow text until we reach `@end #1'. % Define a command to swallow text until we reach `@end #1'.
\long\def\doignoretext##1\end #1{\enddoignore}% % This @ is a catcode 12 token (that is the normal catcode of @ in
% this texinfo.tex file). We change the catcode of @ below to match.
\long\def\doignoretext##1@end #1{\enddoignore}%
% %
% Make sure that spaces turn into tokens that match what \doignoretext wants. % Make sure that spaces turn into tokens that match what \doignoretext wants.
\catcode32 = 10 \catcode32 = 10
@ -795,6 +800,22 @@ where each line of input produces a line of output.}
\catcode`\{ = 9 \catcode`\{ = 9
\catcode`\} = 9 \catcode`\} = 9
% %
% We must not have @c interpreted as a control sequence.
\catcode`\@ = 12
%
% Make the letter c a comment character so that the rest of the line
% will be ignored. This way, the document can have (for example)
% @c @end ifinfo
% and the @end ifinfo will be properly ignored.
% (We've just changed @ to catcode 12.)
%
% But we can't do this if #1 is `macro', since that actually contains a c.
% Happily, none of the other conditionals have the letter `c' in their names!
\def\temp{#1}%
\ifx\temp\macrocsname \else
\catcode`\c = 14
\fi
%
% And now expand that command. % And now expand that command.
\doignoretext \doignoretext
} }