diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty | 79 |
1 files changed, 67 insertions, 12 deletions
diff --git a/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty b/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty index 44459240356..9113f512993 100644 --- a/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty +++ b/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty @@ -9,7 +9,7 @@ %% This is a generated file. %% %% Project: ltxcmds -%% Version: 2011/04/18 v1.20 +%% Version: 2011/11/09 v1.22 %% %% Copyright (C) 2009-2011 by %% Heiko Oberdiek <heiko.oberdiek at googlemail.com> @@ -36,7 +36,8 @@ %% ltxcmds.sty, ltxcmds.pdf, ltxcmds.ins, ltxcmds.drv, %% ltxcmds-test1.tex, ltxcmds-test-gobble.tex, %% ltxcmds-test-ifempty.tex, ltxcmds-test-zapspace.tex, -%% ltxcmds-test-ifboxempty.tex, ltxcmds-test-nextchar.tex. +%% ltxcmds-test-ifboxempty.tex, ltxcmds-test-nextchar.tex, +%% ltxcmds-test-carcdr.tex. %% \begingroup\catcode61\catcode48\catcode32=10\relax% \catcode13=5 % ^^M @@ -104,7 +105,7 @@ \fi \expandafter\x\csname ver@ltxcmds.sty\endcsname \ProvidesPackage{ltxcmds}% - [2011/04/18 v1.20 LaTeX kernel commands for general use (HO)]% + [2011/11/09 v1.22 LaTeX kernel commands for general use (HO)]% \begingroup\catcode61\catcode48\catcode32=10\relax% \catcode13=5 % ^^M \endlinechar=13 % @@ -216,16 +217,30 @@ \long\def\ltx@secondoffour#1#2#3#4{#2} \long\def\ltx@thirdoffour#1#2#3#4{#3}% \long\def\ltx@fourthoffour#1#2#3#4{#4}% -\long\def\ltx@car#1#2\@nil{#1} -\long\def\ltx@cdr#1#2\@nil{#2} \long\def\ltx@carzero#1\@nil{}% -\long\def\ltx@cdrzero#1\@nil{#1}% +\long\def\LTXcmds@cdrzero#1\@nil{#1} +\def\ltx@cdrzero{% + \romannumeral\LTXcmds@cdrzero\ltx@zero +} +\long\def\ltx@car#1#2\@nil{#1} +\long\def\ltx@cdr#1{% + \romannumeral\LTXcmds@cdrzero\ltx@zero +} \long\def\ltx@cartwo#1#2#3\@nil{#1#2} -\long\def\ltx@cdrtwo#1#2#3\@nil{#3} +\long\def\ltx@carsecond#1#2#3\@nil{#2} +\long\def\ltx@cdrtwo#1#2{% + \romannumeral\LTXcmds@cdrzero\ltx@zero +} \long\def\ltx@carthree#1#2#3#4\@nil{#1#2#3} -\long\def\ltx@cdrthree#1#2#3#4\@nil{#4} +\long\def\ltx@carthird#1#2#3#4\@nil{#3} +\long\def\ltx@cdrthree#1#2#3{% + \romannumeral\LTXcmds@cdrzero\ltx@zero +} \long\def\ltx@carfour#1#2#3#4#5\@nil{#1#2#3#4} -\long\def\ltx@cdrfour#1#2#3#4#5\@nil{#5} +\long\def\ltx@carfourth#1#2#3#4#5\@nil{#4} +\long\def\ltx@cdrfour#1#2#3#4{% + \romannumeral\LTXcmds@cdrzero\ltx@zero +} \def\ltx@CarNum#1{% \romannumeral \csname LTXcmds@CarNumFinish% @@ -245,12 +260,22 @@ \ltx@zero #1% } +\def\ltx@CarNumth#1{% + \romannumeral + \expandafter\expandafter\expandafter + \LTXcmds@CarNumth + \ltx@GobbleNum{#1}{}% +} +\long\def\LTXcmds@CarNumth#1#2\@nil{% + \ltx@zero + #1% +} \def\ltx@CdrNum#1{% - \romannumeral0% - \expandafter\expandafter\expandafter\LTXcmds@CdrNum + \romannumeral% + \expandafter\expandafter\expandafter\ltx@cdrzero + \expandafter\expandafter\expandafter\ltx@zero \ltx@GobbleNum{#1}% } -\long\def\LTXcmds@CdrNum#1\@nil{ #1}% \long\def\ltx@ReturnAfterFi#1\fi{\fi#1} \long\def\ltx@ReturnAfterElseFi#1\else#2\fi{\fi#1} \def\ltx@empty{} @@ -476,6 +501,36 @@ \endgroup \let#1\LTXcmds@gtemp } +\long\def\ltx@GlobalPrependToMacro#1#2{% + \ifx\ltx@undefined#1% + \let#1\ltx@empty + \else + \ifx\relax#1% + \let#1\ltx@empty + \fi + \fi + \begingroup + \ltx@LocToksA{#2}% + \ltx@LocToksB\expandafter{#1}% + \xdef#1{\the\ltx@LocToksA\the\ltx@LocToksB}% + \endgroup +} +\long\def\ltx@LocalPrependToMacro#1#2{% + \global\let\LTXcmds@gtemp#1% + \ifx\ltx@undefined\LTXcmds@gtemp + \global\let\LTXcmds@gtemp\ltx@empty + \else + \ifx\relax\LTXcmds@gtemp + \global\letLTXcmds@gtemp\ltx@empty + \fi + \fi + \begingroup + \ltx@LocToksA{#2}% + \ltx@LocToksB\expandafter{\LTXcmds@gtemp}% + \xdef\LTXcmds@gtemp{\the\ltx@LocToksA\the\ltx@LocToksB}% + \endgroup + \let#1\LTXcmds@gtemp +} \long\def\ltx@ifnextchar#1#2#3{% \begingroup \let\LTXcmds@CharToken= #1\relax |