Mercurial > gnulib

comparison build-aux/texinfo.tex @ 14017:1d257f14690f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
update from texinfo
author Karl Berry <karl@freefriends.org>
date Fri, 24 Dec 2010 17:21:32 -0800
parents cf781c3da326
children 6ae7b285ce62
comparison
equal deleted inserted replaced
14016:fdade8a28ed5 14017:1d257f14690f
1 % texinfo.tex -- TeX macros to handle Texinfo files. 1 % texinfo.tex -- TeX macros to handle Texinfo files.
2 % 2 %
3 % Load plain if necessary, i.e., if running under initex. 3 % Load plain if necessary, i.e., if running under initex.
4 \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi 4 \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
5 % 5 %
6 \def\texinfoversion{2010-09-06.17} 6 \def\texinfoversion{2010-12-23.17}
7 % 7 %
8 % Copyright 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995, 8 % Copyright 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995,
9 % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 9 % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
10 % 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 10 % 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
11 % 11 %
6889 \immediate\closeout\macscribble 6889 \immediate\closeout\macscribble
6890 \input \jobname.tmp 6890 \input \jobname.tmp
6891 } 6891 }
6892 \fi 6892 \fi
6893 6893
6894 \def\scanmacro#1{% 6894 \def\scanmacro#1{\begingroup
6895 \begingroup 6895 \newlinechar`\^^M
6896 \newlinechar`\^^M 6896 \let\xeatspaces\eatspaces
6897 \let\xeatspaces\eatspaces 6897 %
6898 % Undo catcode changes of \startcontents and \doprintindex 6898 % Undo catcode changes of \startcontents and \doprintindex
6899 % When called from @insertcopying or (short)caption, we need active 6899 % When called from @insertcopying or (short)caption, we need active
6900 % backslash to get it printed correctly. Previously, we had 6900 % backslash to get it printed correctly. Previously, we had
6901 % \catcode`\\=\other instead. We'll see whether a problem appears 6901 % \catcode`\\=\other instead. We'll see whether a problem appears
6902 % with macro expansion. --kasal, 19aug04 6902 % with macro expansion. --kasal, 19aug04
6903 \catcode`\@=0 \catcode`\\=\active \escapechar=`\@ 6903 \catcode`\@=0 \catcode`\\=\active \escapechar=`\@
6904 % ... and \example 6904 %
6905 \spaceisspace 6905 % ... and for \example:
6906 % 6906 \spaceisspace
6907 % Append \endinput to make sure that TeX does not see the ending newline. 6907 %
6908 % I've verified that it is necessary both for e-TeX and for ordinary TeX 6908 % The \empty here causes a following catcode 5 newline to be eaten
6909 % --kasal, 29nov03 6909 % as part of reading whitespace after a control sequence. It does
6910 \scantokens{#1\endinput}% 6910 % not eat a catcode 13 newline. There's no good way to handle the
6911 \endgroup 6911 % two cases. See the Macro Details node in the manual for the
6912 } 6912 % workaround we currently have to recommend for macros and
6913 % line-oriented commands.
6914 \scantokens{#1\empty}%
6915 \endgroup}
6913 6916
6914 \def\scanexp#1{% 6917 \def\scanexp#1{%
6915 \edef\temp{\noexpand\scanmacro{#1}}% 6918 \edef\temp{\noexpand\scanmacro{#1}}%
6916 \temp 6919 \temp
6917 } 6920 }