diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/oberdiek/magicnum.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/oberdiek/magicnum.sty | 161 |
1 files changed, 109 insertions, 52 deletions
diff --git a/Master/texmf-dist/tex/generic/oberdiek/magicnum.sty b/Master/texmf-dist/tex/generic/oberdiek/magicnum.sty index 0d58d65afb8..26d896a03b7 100644 --- a/Master/texmf-dist/tex/generic/oberdiek/magicnum.sty +++ b/Master/texmf-dist/tex/generic/oberdiek/magicnum.sty @@ -8,7 +8,7 @@ %% %% This is a generated file. %% -%% Copyright (C) 2007, 2009, 2010 by +%% Copyright (C) 2007, 2009, 2010, 2011 by %% Heiko Oberdiek <heiko.oberdiek at googlemail.com> %% %% This work may be distributed and/or modified under the @@ -32,16 +32,20 @@ %% and the derived files %% magicnum.sty, magicnum.pdf, magicnum.ins, magicnum.drv, magicnum.txt, %% magicnum-test1.tex, magicnum-test2.tex, magicnum-test3.tex, -%% magicnum.lua, oberdiek.magicnum.lua. +%% magicnum-test4.tex, magicnum.lua, oberdiek.magicnum.lua. %% -\begingroup - \catcode44 12 % , - \catcode45 12 % - - \catcode46 12 % . - \catcode58 12 % : - \catcode64 11 % @ - \catcode123 1 % { - \catcode125 2 % } +\begingroup\catcode61\catcode48\catcode32=10\relax% + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode35=6 % # + \catcode39=12 % ' + \catcode44=12 % , + \catcode45=12 % - + \catcode46=12 % . + \catcode58=12 % : + \catcode64=11 % @ + \catcode123=1 % { + \catcode125=2 % } \expandafter\let\expandafter\x\csname ver@magicnum.sty\endcsname \ifx\x\relax % plain-TeX, first loading \else @@ -49,7 +53,6 @@ \ifx\x\empty % LaTeX, first loading, % variable is initialized, but \ProvidesPackage not yet seen \else - \catcode35 6 % # \expandafter\ifx\csname PackageInfo\endcsname\relax \def\x#1#2{% \immediate\write-1{Package #1 Info: #2.}% @@ -61,21 +64,24 @@ \aftergroup\endinput \fi \fi -\endgroup -\begingroup - \catcode35 6 % # - \catcode40 12 % ( - \catcode41 12 % ) - \catcode44 12 % , - \catcode45 12 % - - \catcode46 12 % . - \catcode47 12 % / - \catcode58 12 % : - \catcode64 11 % @ - \catcode91 12 % [ - \catcode93 12 % ] - \catcode123 1 % { - \catcode125 2 % } +\endgroup% +\begingroup\catcode61\catcode48\catcode32=10\relax% + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode35=6 % # + \catcode39=12 % ' + \catcode40=12 % ( + \catcode41=12 % ) + \catcode44=12 % , + \catcode45=12 % - + \catcode46=12 % . + \catcode47=12 % / + \catcode58=12 % : + \catcode64=11 % @ + \catcode91=12 % [ + \catcode93=12 % ] + \catcode123=1 % { + \catcode125=2 % } \expandafter\ifx\csname ProvidesPackage\endcsname\relax \def\x#1#2#3[#4]{\endgroup \immediate\write-1{Package: #3 #4}% @@ -94,31 +100,41 @@ \fi \expandafter\x\csname ver@magicnum.sty\endcsname \ProvidesPackage{magicnum}% - [2010/03/09 v1.2 Magic numbers (HO)] -\begingroup - \catcode123 1 % { - \catcode125 2 % } + [2011/04/10 v1.4 Magic numbers (HO)]% +\begingroup\catcode61\catcode48\catcode32=10\relax% + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode123=1 % { + \catcode125=2 % } + \catcode64=11 % @ \def\x{\endgroup \expandafter\edef\csname magicnum@AtEnd\endcsname{% - \catcode35 \the\catcode35\relax - \catcode64 \the\catcode64\relax - \catcode123 \the\catcode123\relax - \catcode125 \the\catcode125\relax + \endlinechar=\the\endlinechar\relax + \catcode13=\the\catcode13\relax + \catcode32=\the\catcode32\relax + \catcode35=\the\catcode35\relax + \catcode61=\the\catcode61\relax + \catcode64=\the\catcode64\relax + \catcode123=\the\catcode123\relax + \catcode125=\the\catcode125\relax }% }% -\x -\catcode35 6 % # -\catcode64 11 % @ -\catcode123 1 % { -\catcode125 2 % } +\x\catcode61\catcode48\catcode32=10\relax% +\catcode13=5 % ^^M +\endlinechar=13 % +\catcode35=6 % # +\catcode64=11 % @ +\catcode123=1 % { +\catcode125=2 % } \def\TMP@EnsureCode#1#2{% \edef\magicnum@AtEnd{% \magicnum@AtEnd - \catcode#1 \the\catcode#1\relax + \catcode#1=\the\catcode#1\relax }% - \catcode#1 #2\relax + \catcode#1=#2\relax } \TMP@EnsureCode{34}{12}% " +\TMP@EnsureCode{39}{12}% ' \TMP@EnsureCode{40}{12}% ( \TMP@EnsureCode{41}{12}% ) \TMP@EnsureCode{42}{12}% * @@ -126,14 +142,18 @@ \TMP@EnsureCode{45}{12}% - \TMP@EnsureCode{46}{12}% . \TMP@EnsureCode{47}{12}% / +\TMP@EnsureCode{58}{12}% : \TMP@EnsureCode{60}{12}% < \TMP@EnsureCode{62}{12}% > +\TMP@EnsureCode{91}{12}% [ +\TMP@EnsureCode{93}{12}% ] +\edef\magicnum@AtEnd{\magicnum@AtEnd\noexpand\endinput} \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname newcommand\endcsname\relax \expandafter\ifx\csname magicnum\endcsname\relax \else \input infwarerr.sty\relax - \@PackageErrorNoLine{magicnum}{% + \@PackageError{magicnum}{% \string\magicnum\space is already defined% }\@ehc \fi @@ -166,26 +186,63 @@ \else \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname RequirePackage\endcsname\relax - \input luatex.sty\relax + \input ifluatex.sty\relax + \input infwarerr.sty\relax \else - \RequirePackage{luatex}[2010/03/09]% + \RequirePackage{ifluatex}[2010/03/01]% + \RequirePackage{infwarerr}[2010/04/08]% \fi \ifnum\luatexversion<36 % \def\magicnum@directlua{\directlua0 }% \else \let\magicnum@directlua\directlua \fi + \magicnum@directlua{% + require("oberdiek.magicnum")% + }% + \begingroup + \def\x{2011/04/10 v1.4}% + \def\StripPrefix#1>{}% + \edef\x{\expandafter\StripPrefix\meaning\x}% + \edef\y{% + \magicnum@directlua{% + if oberdiek.magicnum.getversion then % + oberdiek.magicnum.getversion()% + end% + }% + }% + \ifx\x\y + \else + \@PackageError{magicnum}{% + Wrong version of lua module.\MessageBreak + Package version: \x\MessageBreak + Lua module: \y + }\@ehc + \fi + \endgroup + \begingroup + \expandafter\ifx\csname luaescapestring\endcsname\relax + \directlua{% + if tex.enableprimitives then % + tex.enableprimitives('magicnum@', {'luaescapestring'})% + end% + }% + \global\let\luaescapestring\magicnum@luaescapestring + \fi + \expandafter\ifx\csname luaescapestring\endcsname\relax + \escapechar=92 % + \@PackageError{magicnum}{% + Missing \string\luaescapestring + }\@ehc + \fi + \endgroup \def\magicnum#1{% \magicnum@directlua{% - require("oberdiek.magicnum")% - oberdiek.magicnum.get(% - "\luatexluaescapestring{#1}",\number\CatcodeTableString - )% + oberdiek.magicnum.get("\luaescapestring{#1}")% }% }% - \magicnum@AtEnd - \expandafter\endinput -\fi + \expandafter\magicnum@AtEnd +\fi% \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname detokenize\endcsname\relax \def\magicnum@add#1#2#3{% @@ -294,7 +351,7 @@ \magicnum@add{luatex.pdfliteral.mode}{setorigin}{0} \magicnum@add{luatex.pdfliteral.mode}{page}{1} \magicnum@add{luatex.pdfliteral.mode}{direct}{2} -\magicnum@AtEnd +\magicnum@AtEnd% \endinput %% %% End of file `magicnum.sty'. |