diff options
author | Karl Berry <karl@freefriends.org> | 2010-05-04 17:35:01 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2010-05-04 17:35:01 +0000 |
commit | 3cd7d680d047db2f439ccba96948f1ceaa6d973f (patch) | |
tree | 99414f003d20290deb6c11806bde6685c1eb9b25 /Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty | |
parent | 67c3a09c0f5d7fcf6bff5cfbc686a0c247d0e744 (diff) |
oberdiek update (3may10)
git-svn-id: svn://tug.org/texlive/trunk@18100 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty | 57 |
1 files changed, 55 insertions, 2 deletions
diff --git a/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty b/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty index 325a483fbf4..6df197f2554 100644 --- a/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty +++ b/Master/texmf-dist/tex/generic/oberdiek/ltxcmds.sty @@ -31,7 +31,7 @@ %% This work consists of the main source file ltxcmds.dtx %% and the derived files %% ltxcmds.sty, ltxcmds.pdf, ltxcmds.ins, ltxcmds.drv, -%% ltxcmds-test1.tex. +%% ltxcmds-test1.tex, ltxcmds-test-gobble.tex. %% \begingroup \catcode44 12 % , @@ -93,7 +93,7 @@ \fi \expandafter\x\csname ver@ltxcmds.sty\endcsname \ProvidesPackage{ltxcmds}% - [2010/04/16 v1.6 LaTeX kernel commands for general use (HO)] + [2010/04/26 v1.7 LaTeX kernel commands for general use (HO)] \begingroup \catcode123 1 % { \catcode125 2 % } @@ -133,22 +133,65 @@ \chardef\ltx@zero=0 % \chardef\ltx@one=1 % \chardef\ltx@two=2 % +\chardef\ltx@active=13 % \chardef\ltx@cclv=255 % \long\def\ltx@gobble#1{} \long\def\ltx@gobbletwo#1#2{} \long\def\ltx@gobblethree#1#2#3{} \long\def\ltx@gobblefour#1#2#3#4{} +\def\ltx@GobbleNum#1{% + \romannumeral + \csname ltx@zero% + \expandafter\LTXcmds@GobbleNum + \romannumeral\expandafter\ltx@firstofone + \expandafter{\LTXcmds@num#1}000{m\endcsname}% +} +\def\LTXcmds@GobbleNum#1{% + \csname LTXcmds@G#1\LTXcmds@GobbleNum +} +\long\def\LTXcmds@Gm#1{% + \endcsname +} \long\def\ltx@firstofone#1{#1} \long\def\ltx@firstoftwo#1#2{#1} \long\def\ltx@secondoftwo#1#2{#2} \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\ltx@cartwo#1#2#3\@nil{#1#2} \long\def\ltx@cdrtwo#1#2#3\@nil{#3} \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@carfour#1#2#3#4#5\@nil{#1#2#3#4} \long\def\ltx@cdrfour#1#2#3#4#5\@nil{#5} +\def\ltx@CarNum#1{% + \romannumeral + \csname LTXcmds@CarNumFinish% + \expandafter\LTXcmds@CarNum + \romannumeral\expandafter\ltx@firstofone + \expandafter{\LTXcmds@num#1}000{x\endcsname}% +} +\def\LTXcmds@CarNum#1{% + \csname LTXcmds@C#1\LTXcmds@CarNum +} +\long\def\LTXcmds@Cm#1#2{% + \endcsname{#1#2}% +} +\def\LTXcmds@Cx#1{% + \endcsname{}% +} +\long\def\LTXcmds@CarNumFinish#1#2\@nil{% + \ltx@zero + #1% +} +\def\ltx@CdrNum#1{% + \romannumeral0% + \expandafter\expandafter\expandafter\LTXcmds@CdrNum + \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{} @@ -163,6 +206,11 @@ \lowercase{\endgroup \def\ltx@backslashchar{0}% } +\begingroup + \lccode`0=`\#\relax +\lowercase{\endgroup + \def\ltx@hashchar{0}% +} \def\ltx@newif#1{% \begingroup \escapechar=-1 % @@ -398,6 +446,11 @@ \ltx@leavevmode \hbox } +\ltx@IfUndefined{numexpr}{% + \let\LTXcmds@num\number +}{% + \let\LTXcmds@num\numexpr +} \LTXcmds@AtEnd \endinput %% |