diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/base/ltfssdcl.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/base/ltfssdcl.dtx | 62 |
1 files changed, 35 insertions, 27 deletions
diff --git a/Master/texmf-dist/source/latex/base/ltfssdcl.dtx b/Master/texmf-dist/source/latex/base/ltfssdcl.dtx index f2aee76bdab..da024b1f1e6 100644 --- a/Master/texmf-dist/source/latex/base/ltfssdcl.dtx +++ b/Master/texmf-dist/source/latex/base/ltfssdcl.dtx @@ -1,6 +1,6 @@ % \iffalse meta-comment % -% Copyright 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 +% Copyright 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 % The LaTeX3 Project and any individual authors listed elsewhere % in this file. % @@ -8,12 +8,12 @@ % ------------------------------------------- % % It may be distributed and/or modified under the -% conditions of the LaTeX Project Public License, either version 1.3 +% conditions of the LaTeX Project Public License, either version 1.3c % of this license or (at your option) any later version. % 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 2003/12/01 or later. +% and version 1.3c or later is part of all distributions of LaTeX +% version 2005/12/01 or later. % % This file has the LPPL maintenance status "maintained". % @@ -36,7 +36,7 @@ % % \ProvidesFile{ltfssdcl.dtx} - [1998/08/17 v3.0i LaTeX Kernel (NFSS Declarative Interface)] + [2005/09/27 v3.0k LaTeX Kernel (NFSS Declarative Interface)] % \iffalse \documentclass{ltxdoc} \begin{document} @@ -52,7 +52,7 @@ %<+checkmem>\CHECKMEM % \fi % -% \CheckSum{1871} +% \CheckSum{1879} % % % \GetFileInfo{ltfssdcl.dtx} @@ -365,17 +365,17 @@ % \begin{macro}{\non@alpherr} % \changes{v3.0c}{1995/10/10} % {(DPC) autoload error message} +% \changes{v3.0j}{2005/07/27} +% {(MH) Change because command is now properly robust} % \begin{macrocode} %</2ekernel|autoload> %<*2ekernel|autoerr> \gdef\non@alpherr#1{\@latex@error{% % \end{macrocode} -% Since the argument is the internal alphabet name, we have to get -% rid of the |@| in its name. The trick here is to use |\@firstoftwo| -% which is a \LaTeX{} macro which discards the second of two -% arguments. +% The command here will have a space at the end of its name, so we make +% sure not to insert an extra one. % \begin{macrocode} - \expandafter\@firstoftwo\string#1 allowed only in math mode}\@ehd} + \string#1allowed only in math mode}\@ehd} %</2ekernel|autoerr> %<autoload>\def\non@alpherr{\@autoerr\non@alpherr} %<*2ekernel|autoload> @@ -751,6 +751,8 @@ % \end{macro} % % \begin{macro}{\DeclareMathAlphabet} +% \changes{v3.0j}{2005/07/27} +% {(MH) Make document commands robust} % \begin{macrocode} \def\DeclareMathAlphabet#1#2#3#4#5{% \@tempswafalse @@ -768,8 +770,8 @@ % Check if it is already a math alphabet. % \begin{macrocode} \edef\reserved@a{\noexpand\in@{\string\select@group}% - {\expandafter\meaning\csname @\expandafter - \@gobble\string#1\endcsname}}% + {\expandafter\meaning\csname \expandafter + \@gobble\string#1\space\endcsname}}% \reserved@a \ifin@ \@font@info{Redeclaring math alphabet \string#1}% @@ -780,7 +782,7 @@ % \changes{???}{1994/04/18}{Pass correct arg (2 not 3)} % \begin{macrocode} \csname M@#2\expandafter\endcsname - \csname @\expandafter\@gobble\string#1\endcsname#1}% + \csname \expandafter\@gobble\string#1\space\endcsname#1}% \version@list \else % \end{macrocode} @@ -788,8 +790,8 @@ % |\DeclareSymbolFontAlphabet|. % \begin{macrocode} \edef\reserved@a{\noexpand\in@{\string\use@mathgroup}% - {\expandafter\meaning\csname @\expandafter - \@gobble\string#1\endcsname}}% + {\expandafter\meaning\csname \expandafter + \@gobble\string#1\space\endcsname}}% \reserved@a \ifin@ % \end{macrocode} @@ -815,11 +817,13 @@ % \end{macro} % % \begin{macro}{\new@mathalphabet} +% \changes{v3.0j}{2005/07/27} +% {(MH) Make document commands robust} % \begin{macrocode} \def\new@mathalphabet#1#2#3#4#5{% \toks@\expandafter{\alpha@list}% - \edef#1{\expandafter\noexpand\csname @\expandafter - \@gobble\string#1\endcsname + \edef#1{\expandafter\noexpand\csname \expandafter + \@gobble\string#1\space\endcsname \if/#5/% \noexpand\no@alphabet@error \noexpand\no@alphabet@error @@ -833,8 +837,8 @@ \def\version@elt##1{\toks@\expandafter{##1}% \edef##1{\the\toks@\install@mathalphabet \expandafter\noexpand - \csname @\expandafter\@gobble - \string#1\endcsname + \csname \expandafter\@gobble + \string#1\space\endcsname {\if/#5/% \noexpand\no@alphabet@error \noexpand#1% @@ -843,22 +847,24 @@ \fi}}% }% \version@list - \expandafter\edef\csname @\expandafter\@gobble - \string#1\endcsname{\if/#5/% + \expandafter\edef\csname \expandafter\@gobble + \string#1\space\endcsname{\if/#5/% \noexpand\no@alphabet@error \noexpand#1% \else \noexpand\select@group\the\toks2 \fi}% \edef#1{\noexpand\protect - \expandafter\noexpand\csname @\expandafter - \@gobble\string#1\endcsname}% + \expandafter\noexpand\csname \expandafter + \@gobble\string#1\space\endcsname}% } \@onlypreamble\new@mathalphabet % \end{macrocode} % \end{macro} % % \begin{macro}{\SetMathAlphabet} +% \changes{v3.0j}{2005/07/27} +% {(MH) Make document commands robust} % \begin{macrocode} \def\SetMathAlphabet#1#2#3#4#5#6{% \@tempswafalse @@ -870,7 +876,7 @@ \expandafter\SetMathAlphabet@ \csname mv@#2\expandafter\endcsname\csname#3/#4/#5/#6\expandafter \endcsname \csname M@#3\expandafter\endcsname - \csname @\expandafter\@gobble\string#1\endcsname#1% + \csname \expandafter\@gobble\string#1\space\endcsname#1% \else \@latex@error{Encoding scheme `#3' unknown}\@eha \fi @@ -1391,10 +1397,12 @@ % \end{macro} % % \begin{macro}{\DeclareSymbolFontAlphabet} +% \changes{v3.0j}{2005/07/27} +% {(MH) Make document commands robust} % \begin{macrocode} \def\DeclareSymbolFontAlphabet#1#2{% \expandafter\DeclareSymbolFontAlphabet@ - \csname @\expandafter\@gobble\string#1\endcsname{#2}#1} + \csname \expandafter\@gobble\string#1\space\endcsname{#2}#1} \@onlypreamble\DeclareSymbolFontAlphabet % \end{macrocode} % \end{macro} @@ -1452,7 +1460,7 @@ % at all: % \begin{macrocode} \expandafter\ifx - \csname\expandafter\@gobble\string#1\endcsname + \csname\expandafter\@gobble\string#1\space\endcsname \relax % \end{macrocode} % If it is undefined, fine otherwise check if it is a math alphabet |