diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/oberdiek/luatex.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/oberdiek/luatex.sty | 522 |
1 files changed, 0 insertions, 522 deletions
diff --git a/Master/texmf-dist/tex/generic/oberdiek/luatex.sty b/Master/texmf-dist/tex/generic/oberdiek/luatex.sty deleted file mode 100644 index 489d595dd34..00000000000 --- a/Master/texmf-dist/tex/generic/oberdiek/luatex.sty +++ /dev/null @@ -1,522 +0,0 @@ -%% -%% This is file `luatex.sty', -%% generated with the docstrip utility. -%% -%% The original source files were: -%% -%% luatex.dtx (with options: `package') -%% -%% This is a generated file. -%% -%% Project: luatex -%% Version: 2019/07/25 v0.7 -%% -%% Copyright (C) 2007, 2009, 2010 by -%% Heiko Oberdiek <heiko.oberdiek at googlemail.com> -%% -%% This work may be distributed and/or modified under the -%% conditions of the LaTeX Project Public License, either -%% version 1.3c of this license or (at your option) any later -%% version. This version of this license is in -%% http://www.latex-project.org/lppl/lppl-1-3c.txt -%% and 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 2005/12/01 or later. -%% -%% This work has the LPPL maintenance status "maintained". -%% -%% This Current Maintainer of this work is Heiko Oberdiek. -%% -%% The Base Interpreter refers to any `TeX-Format', -%% because some files are installed in TDS:tex/generic//. -%% -%% This work consists of the main source file luatex.dtx -%% and the derived files -%% luatex.sty, luatex.pdf, luatex.ins, luatex.drv, luatex-loader.sty, -%% luatex-test1.tex, luatex-test2.tex, luatex-test3.tex, -%% luatex-test4.tex, luatex-test5.tex, oberdiek.luatex.lua. -%% -\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@luatex.sty\endcsname - \ifx\x\relax % plain-TeX, first loading - \else - \def\empty{}% - \ifx\x\empty % LaTeX, first loading, - % variable is initialized, but \ProvidesPackage not yet seen - \else - \expandafter\ifx\csname PackageInfo\endcsname\relax - \def\x#1#2{% - \immediate\write-1{Package #1 Info: #2.}% - }% - \else - \def\x#1#2{\PackageInfo{#1}{#2, stopped}}% - \fi - \x{luatex}{The package is already loaded}% - \aftergroup\endinput - \fi - \fi -\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}% - \xdef#1{#4}% - }% - \else - \def\x#1#2[#3]{\endgroup - #2[{#3}]% - \ifx#1\@undefined - \xdef#1{#3}% - \fi - \ifx#1\relax - \xdef#1{#3}% - \fi - }% - \fi -\expandafter\x\csname ver@luatex.sty\endcsname -\ProvidesPackage{luatex}% - [2019/07/25 v0.7 LuaTeX basic definition package (HO)]% -\begingroup\catcode61\catcode48\catcode32=10\relax% - \catcode13=5 % ^^M - \endlinechar=13 % - \catcode123=1 % { - \catcode125=2 % } - \catcode64=11 % @ - \def\x{\endgroup - \expandafter\edef\csname LuT@AtEnd\endcsname{% - \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\catcode61\catcode48\catcode32=10\relax% -\catcode13=5 % ^^M -\endlinechar=13 % -\catcode35=6 % # -\catcode64=11 % @ -\catcode123=1 % { -\catcode125=2 % } -\def\TMP@EnsureCode#1#2{% - \edef\LuT@AtEnd{% - \LuT@AtEnd - \catcode#1=\the\catcode#1\relax - }% - \catcode#1=#2\relax -} -\TMP@EnsureCode{10}{12}% ^^J -\TMP@EnsureCode{34}{12}% " -\TMP@EnsureCode{36}{3}% $ -\TMP@EnsureCode{39}{12}% ' -\TMP@EnsureCode{40}{12}% ( -\TMP@EnsureCode{41}{12}% ) -\TMP@EnsureCode{42}{12}% * -\TMP@EnsureCode{43}{12}% + -\TMP@EnsureCode{44}{12}% , -\TMP@EnsureCode{45}{12}% - -\TMP@EnsureCode{46}{12}% . -\TMP@EnsureCode{47}{12}% / -\TMP@EnsureCode{60}{12}% < -\TMP@EnsureCode{62}{12}% > -\TMP@EnsureCode{91}{12}% [ -\TMP@EnsureCode{93}{12}% ] -\TMP@EnsureCode{95}{12}% _ (other!) -\TMP@EnsureCode{96}{12}% ` -\edef\LuT@AtEnd{\LuT@AtEnd\noexpand\endinput} -\begingroup\expandafter\expandafter\expandafter\endgroup -\expandafter\ifx\csname RequirePackage\endcsname\relax - \input infwarerr.sty\relax - \input ifluatex.sty\relax -\else - \RequirePackage{infwarerr}[2007/09/09]% - \RequirePackage{ifluatex}[2009/04/10]% -\fi -\ifluatex -\else - \@PackageError{luatex}{% - This package may only be run using LuaTeX% - }\@ehc - \expandafter\LuT@AtEnd -\fi% -\ifnum\luatexversion<36 % - \def\LuT@MakePrimitive#1{% - \expandafter\let\csname luatex#1\expandafter\endcsname - \csname #1\endcsname - }% -\else - \def\LuT@MakeLuatexPrimitive#1{% - \begingroup\expandafter\expandafter\expandafter\endgroup - \expandafter\ifx\csname luatex#1\endcsname\relax - \begingroup\expandafter\expandafter\expandafter\endgroup - \expandafter\ifx\csname #1\endcsname\relax - \else - \expandafter\let - \csname luatex#1\expandafter\endcsname - \csname #1\endcsname - \fi - \fi - \begingroup\expandafter\expandafter\expandafter\endgroup - \expandafter\ifx\csname luatex#1\endcsname\relax - \begingroup - \expandafter\let\csname luatex#1\endcsname\@undefined - \ifnum0% - \directlua{% - if tex.enableprimitives then % - tex.enableprimitives('luatex',{'#1'})% - tex.print('1')% - end% - }% - \expandafter\ifx\csname luatex#1\endcsname\relax\else1\fi - =11 % - \global\expandafter\let - \csname luatex#1\expandafter\endcsname - \csname luatex#1\endcsname - \else - \@PackageError{luatex}{% - tex.enableprimitives failed for `#1'% - }\@ehc - \fi - \endgroup - \fi - }% - \def\LuT@MakePrimitive#1{% - \begingroup\expandafter\expandafter\expandafter\endgroup - \expandafter\ifx\csname#1\endcsname\relax - \begingroup - \expandafter\let\csname#1\endcsname\@undefined - \ifnum0% - \directlua{% - if tex.enableprimitives then % - tex.enableprimitives('',{'#1'})% - tex.print('1')% - end% - }% - \expandafter\ifx\csname#1\endcsname\relax\else1\fi - =11 % - \global\expandafter\let - \csname#1\expandafter\endcsname - \csname#1\endcsname - \else - \@PackageError{luatex}{% - tex.enableprimitives failed for `#1'% - }\@ehc - \fi - \endgroup - \fi - }% -\fi -\LuT@MakeLuatexPrimitive{attribute} -\LuT@MakeLuatexPrimitive{attributedef} -\LuT@MakeLuatexPrimitive{catcodetable} -\LuT@MakeLuatexPrimitive{initcatcodetable} -\LuT@MakeLuatexPrimitive{luaescapestring} -\LuT@MakeLuatexPrimitive{savecatcodetable} -\LuT@MakePrimitive{numexpr} -\begingroup\expandafter\expandafter\expandafter\endgroup -\expandafter\ifx\csname RequirePackage\endcsname\relax -\else - \RequirePackage{etex}[1998/03/26]% -\fi -\begingroup\expandafter\expandafter\expandafter\endgroup -\expandafter\ifx\csname et@xins\endcsname\relax - \@PackageWarningNoLine{luatex}{% - Support for eTeX is not loaded (etex.src)% - }% -\else - \def\LuT@temp#1{% - \ifnum\count27#1=32768 % - \count27#1=65536 % - \fi - }% - \LuT@temp0% - \LuT@temp1% - \LuT@temp2% - \LuT@temp3% - \LuT@temp4% - \LuT@temp5% - \LuT@temp6% - \let\newcount\globcount - \let\newdimen\globdimen - \let\newskip\globskip - \let\newbox\globbox -\fi -\expandafter\ifx\csname @empty\endcsname\relax - \def\@empty{}% -\fi -\expandafter\ifx\csname @gobble\endcsname\relax - \long\def\@gobble#1{}% -\fi -\expandafter\ifx\csname @firstofone\endcsname\relax - \long\def\@firstofone#1{#1}% -\fi -\expandafter\ifx\csname @firstoftwo\endcsname\relax - \long\def\@firstoftwo#1#2{#1}% -\fi -\expandafter\ifx\csname @car\endcsname\relax - \def\@car#1#2\@nil{#1}% -\fi -\expandafter\ifx\csname @cdr\endcsname\relax - \def\@cdr#1#2\@nil{#2}% -\fi -\expandafter\ifx\csname @ifstar\endcsname\relax - \def\@ifstar#1{% - \@ifnextchar*{\@firstoftwo{#1}}% - }% - \long\def\@ifnextchar#1#2#3{% - \let\reserved@d=#1% - \def\reserved@a{#2}% - \def\reserved@b{#3}% - \futurelet\@let@token\@ifnch - }% - \def\@ifnch{% - \ifx\@let@token\@sptoken - \let\reserved@c\@xifnch - \else - \ifx\@let@token\reserved@d - \let\reserved@c\reserved@a - \else - \let\reserved@c\reserved@b - \fi - \fi - \reserved@c - }% - \let\LuT@temp\:% - \def\:{\let\@sptoken= }% - \: % explicit space - \def\:{\@xifnch}% - \expandafter\def\: {% - \futurelet\@let@token\@ifnch - }% - \let\:\LuT@temp -\fi -\expandafter\ifx\csname @tempcnta\endcsname\relax - \csname newcount\endcsname\@tempcnta -\fi -\expandafter\ifx\csname @tempcntb\endcsname\relax - \csname newcount\endcsname\@tempcntb -\fi -\begingroup\expandafter\expandafter\expandafter\endgroup -\expandafter\ifx\csname newcommand\endcsname\relax - \def\LuT@newcommand#1[#2]#3{% - \ifx#1\@undefined - \let#1\relax - \else - \ifx#1\relax - \else - \@PackageError{luatex}{% - \string#1 is already defined.\MessageBreak - Redefinition is skipped% - }\@ehc - \fi - \fi - \ifx#1\relax - \ifcase#2 % - \def#1{#3}% - \or - \def#1##1{#3}% - \or - \def#1##1##2{#3}% - \or - \def#1##1##2##3{#3}% - \or - \@INTERNAL@ERROR - \fi - \fi - }% -\else - \def\LuT@newcommand{\newcommand*}% -\fi -\newcount\LuT@AllocAttribute -\LuT@AllocAttribute=\m@ne -\ifx\newattribute\@undefined -\LuT@newcommand\newattribute[1]{% - \ifnum\LuT@AllocAttribute<65535 % - \global\advance\LuT@AllocAttribute\@ne - \allocationnumber\LuT@AllocAttribute - \global\luatexattributedef#1=\allocationnumber - \unsetattribute{#1}% - \wlog{\string#1=\string\attribute\the\allocationnumber}% - \else - \errmessage{No room for a new \string\attribute}% - \fi -} -\fi -\ifx\setattribute\@undefined -\LuT@newcommand\setattribute[2]{% - #1=\numexpr#2\relax -} -\fi -\ifx\unsetattribute\@undefined -\ifnum\luatexversion<37 - \LuT@newcommand\LuT@UnsetAttributeValue[0]{}% - \let\LuT@UnsetAttributeValue\m@ne -\else - \LuT@newcommand\LuT@UnsetAttributeValue[0]{-2147483647 }% -\fi -\LuT@newcommand\unsetattribute[1]{% - #1=\LuT@UnsetAttributeValue -} -\fi -\newcount\LuT@AllocCatcodeTable -\LuT@AllocCatcodeTable=\m@ne -\newcount\CatcodeTableStack -\CatcodeTableStack=\z@ -\ifx\newcatcodetable\@undefined -\LuT@newcommand\newcatcodetable[1]{% - \ifnum\LuT@AllocCatcodeTable<1114110 % 0x10FFFF is maximal \chardef - % or < 268435455 % 2^28 - 1 - \global\advance\LuT@AllocCatcodeTable by\tw@ - \allocationnumber=\LuT@AllocCatcodeTable - \global\chardef#1=\allocationnumber - \wlog{% - \string#1=\string\catcodetable\the\allocationnumber - }% - \else - \errmessage{No room for a new \string\catcodetable}% - \fi -}% -\fi -\LuT@newcommand\IncCatcodeTableStack[0]{% - \ifnum\CatcodeTableStack<268435454 % - \global\advance\CatcodeTableStack by\tw@ - \else - \@PackageError{luatex}{% - Catcode table stack overflow% - }\@ehd - \fi -} -\LuT@newcommand\DecCatcodeTableStack[0]{% - \ifnum\CatcodeTableStack>\z@ - \global\advance\CatcodeTableStack by-2 % - \else - \@PackageError{luatex}{% - Catcode table stack is empty% - }\@ehd - \fi -} -\LuT@newcommand\SetCatcodeRange[3]{% - \edef\LuT@temp{% - \noexpand\@tempcnta=\the\@tempcnta - \noexpand\@tempcntb=\the\@tempcntb - \noexpand\count@=\the\count@ - \relax - }% - \@tempcnta=\numexpr#1\relax - \@tempcntb=\numexpr#2\relax - \count@=\numexpr#3\relax - \loop - \unless\ifnum\@tempcnta>\@tempcntb - \catcode\@tempcnta=\count@ - \advance\@tempcnta by \@ne - \repeat - \LuT@temp -} -\newcatcodetable\CatcodeTableIniTeX -\newcatcodetable\CatcodeTableString -\newcatcodetable\CatcodeTableOther -\newcatcodetable\CatcodeTableLaTeX -\luatexinitcatcodetable\CatcodeTableIniTeX -\begingroup - \def\@makeother#1{\catcode#1=12\relax}% - \@firstofone{% - \luatexcatcodetable\CatcodeTableIniTeX - \begingroup - \SetCatcodeRange{0}{8}{15}% - \catcode9=10 % tab - \catcode11=15 % - \catcode12=13 % form feed - \SetCatcodeRange{14}{31}{15}% - \catcode35=6 % hash - \catcode36=3 % dollar - \catcode38=4 % ampersand - \catcode94=7 % circumflex - \catcode95=8 % underscore - \catcode123=1 % brace left - \catcode125=2 % brace right - \catcode126=13 % tilde - \catcode127=15 % - \luatexsavecatcodetable\CatcodeTableLaTeX - \endgroup - \@makeother{0}% nul - \@makeother{13}% carriage return - \@makeother{37}% percent - \@makeother{92}% backslash - \@makeother{127}% - \SetCatcodeRange{65}{90}{12}% A-Z - \SetCatcodeRange{97}{122}{12}% a-z - \luatexsavecatcodetable\CatcodeTableString - \@makeother{32}% space - \luatexsavecatcodetable\CatcodeTableOther - \endgroup -}% -\def\LuT@NumStackEmpty{0} -\let\LuT@NumStack\LuT@NumStackEmpty -\LuT@newcommand\PushCatcodeTableNumStack[0]{% - \xdef\LuT@NumStack{% - {\the\luatexcatcodetable}\LuT@NumStack - }% -} -\LuT@newcommand\PopCatcodeTableNumStack[0]{% - \ifx\LuT@NumStack\LuT@NumStackEmpty - \@PackageWarning{luatex}{Empty catcode table number stack}% - \luatexcatcodetable\z@ - \else - \luatexcatcodetable=\expandafter\@car\LuT@NumStack\@nil\relax - \xdef\LuT@NumStack{% - \expandafter\@cdr\LuT@NumStack\@nil - }% - \fi -} -\LuT@newcommand\BeginCatcodeRegime[1]{% - \PushCatcodeTableNumStack - \luatexcatcodetable=\numexpr#1\relax - \IncCatcodeTableStack - \luatexsavecatcodetable\CatcodeTableStack - \luatexcatcodetable\CatcodeTableStack -} -\LuT@newcommand\EndCatcodeRegime[0]{% - \DecCatcodeTableStack - \PopCatcodeTableNumStack -} -\begingroup\expandafter\expandafter\expandafter\endgroup -\expandafter\ifx\csname RequirePackage\endcsname\relax - \input luatex-loader.sty\relax -\else - \RequirePackage{luatex-loader}[2010/03/09]% -\fi -\LuT@AtEnd% -\endinput -%% -%% End of file `luatex.sty'. |