diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/xint/xintkernel.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/xint/xintkernel.sty | 179 |
1 files changed, 87 insertions, 92 deletions
diff --git a/Master/texmf-dist/tex/generic/xint/xintkernel.sty b/Master/texmf-dist/tex/generic/xint/xintkernel.sty index 3e6c0afa591..6d793505eb6 100644 --- a/Master/texmf-dist/tex/generic/xint/xintkernel.sty +++ b/Master/texmf-dist/tex/generic/xint/xintkernel.sty @@ -21,7 +21,7 @@ %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) %% --------------------------------------------------------------- -%% The xint bundle 1.4k 2022/05/18 +%% The xint bundle 1.4l 2022/05/29 %% Copyright (C) 2013-2022 by Jean-Francois Burnol %% xintkernel: Paraphernalia for the xint packages %% --------------------------------------------------------------- @@ -30,116 +30,111 @@ \endlinechar=13 % \catcode123=1 % { \catcode125=2 % } - \catcode35=6 % # \catcode44=12 % , - \catcode45=12 % - \catcode46=12 % . \catcode58=12 % : - \catcode95=11 % _ - \expandafter - \ifx\csname PackageInfo\endcsname\relax - \def\y#1#2{\immediate\write-1{Package #1 Info: #2.}}% + \catcode94=7 % ^ + \def\space{ }\newlinechar10 + \let\z\relax + \expandafter\ifx\csname numexpr\endcsname\relax + \expandafter\ifx\csname PackageWarning\endcsname\relax + \immediate\write128{^^JPackage xintkernel Warning:^^J% + \space\space\space\space + \numexpr not available, aborting input.^^J}% \else - \def\y#1#2{\PackageInfo{#1}{#2}}% + \PackageWarningNoLine{xintkernel}{\numexpr not available, aborting input}% \fi - \let\z\relax - \expandafter - \ifx\csname numexpr\endcsname\relax - \y{xintkernel}{\numexpr not available, aborting input}% - \def\z{\endgroup\endinput}% + \def\z{\endgroup\endinput}% + \else + \expandafter\ifx\csname XINTsetupcatcodes\endcsname\relax \else - \expandafter - \ifx\csname XINTsetupcatcodes\endcsname\relax - \else - \y{xintkernel}{I was already loaded, aborting input}% \def\z{\endgroup\endinput}% - \fi \fi + \fi \ifx\z\relax\else\expandafter\z\fi% \def\PrepareCatcodes {% \endgroup \def\XINTrestorecatcodes - {% takes care of all, to allow more economical code in modules - \catcode0=\the\catcode0 % - \catcode59=\the\catcode59 % ; xintexpr - \catcode126=\the\catcode126 % ~ xintexpr - \catcode39=\the\catcode39 % ' xintexpr - \catcode34=\the\catcode34 % " xintbinhex, and xintexpr - \catcode63=\the\catcode63 % ? xintexpr - \catcode124=\the\catcode124 % | xintexpr - \catcode38=\the\catcode38 % & xintexpr - \catcode64=\the\catcode64 % @ xintexpr - \catcode33=\the\catcode33 % ! xintexpr - \catcode93=\the\catcode93 % ] -, xintfrac, xintseries, xintcfrac - \catcode91=\the\catcode91 % [ -, xintfrac, xintseries, xintcfrac - \catcode36=\the\catcode36 % $ xintgcd only $ - \catcode94=\the\catcode94 % ^ - \catcode96=\the\catcode96 % ` - \catcode47=\the\catcode47 % / - \catcode41=\the\catcode41 % ) - \catcode40=\the\catcode40 % ( - \catcode42=\the\catcode42 % * - \catcode43=\the\catcode43 % + - \catcode62=\the\catcode62 % > - \catcode60=\the\catcode60 % < - \catcode58=\the\catcode58 % : - \catcode46=\the\catcode46 % . - \catcode45=\the\catcode45 % - - \catcode44=\the\catcode44 % , - \catcode35=\the\catcode35 % # - \catcode95=\the\catcode95 % _ - \catcode125=\the\catcode125 % } - \catcode123=\the\catcode123 % { - \endlinechar=\the\endlinechar - \catcode13=\the\catcode13 % ^^M - \catcode32=\the\catcode32 % - \catcode61=\the\catcode61\relax % = + {% prepared for use in \edef + \catcode0=\the\catcode0 % ^^@ + \catcode1=\the\catcode1 % ^^A + \catcode13=\the\catcode13 % ^^M + \catcode32=\the\catcode32 % <space> + \catcode33=\the\catcode33 % ! + \catcode34=\the\catcode34 % " + \catcode35=\the\catcode35 % # + \catcode36=\the\catcode36 % $ + \catcode38=\the\catcode38 % & + \catcode39=\the\catcode39 % ' + \catcode40=\the\catcode40 % ( + \catcode41=\the\catcode41 % ) + \catcode42=\the\catcode42 % * + \catcode43=\the\catcode43 % + + \catcode44=\the\catcode44 % , + \catcode45=\the\catcode45 % - + \catcode46=\the\catcode46 % . + \catcode47=\the\catcode47 % / + \catcode58=\the\catcode58 % : + \catcode59=\the\catcode59 % ; + \catcode60=\the\catcode60 % < + \catcode61=\the\catcode61 % = + \catcode62=\the\catcode62 % > + \catcode63=\the\catcode63 % ? + \catcode64=\the\catcode64 % @ + \catcode91=\the\catcode91 % [ + \catcode93=\the\catcode93 % ] + \catcode94=\the\catcode94 % ^ + \catcode95=\the\catcode95 % _ + \catcode96=\the\catcode96 % ` + \catcode123=\the\catcode123 % { + \catcode124=\the\catcode124 % | + \catcode125=\the\catcode125 % } + \catcode126=\the\catcode126 % ~ + \endlinechar=\the\endlinechar\relax }% \edef\XINTrestorecatcodesendinput {% \XINTrestorecatcodes\noexpand\endinput % }% \def\XINTsetcatcodes - {% - \catcode61=12 % = - \catcode32=10 % space - \catcode13=5 % ^^M - \endlinechar=13 % - \catcode123=1 % { - \catcode125=2 % } - \catcode95=11 % _ LETTER - \catcode35=6 % # - \catcode44=12 % , - \catcode45=12 % - - \catcode46=12 % . - \catcode58=11 % : LETTER - \catcode60=12 % < - \catcode62=12 % > - \catcode43=12 % + - \catcode42=12 % * - \catcode40=12 % ( - \catcode41=12 % ) - \catcode47=12 % / - \catcode96=12 % ` - \catcode94=11 % ^ LETTER - \catcode36=3 % $ - \catcode91=12 % [ - \catcode93=12 % ] - \catcode33=12 % ! (xintexpr.sty will use catcode 11) - \catcode64=11 % @ LETTER - \catcode38=7 % & for \romannumeral`&&@ trick. - \catcode124=12 % | - \catcode63=11 % ? LETTER - \catcode34=12 % " - \catcode39=12 % ' - \catcode126=3 % ~ MATH - \catcode59=12 % ; - \catcode0=12 % for \romannumeral`&&@ trick - \catcode1=3 % for ultra-safe séparateur &&A + {% standard settings with a few xint*sty specific ones + \catcode0=12 % for \romannumeral`&&@ + \catcode1=3 % for safe separator &&A + \catcode13=5 % ^^M + \catcode32=10 % <space> + \catcode33=12 % ! but used as LETTER inside xintexpr.sty + \catcode34=12 % " + \catcode35=6 % # + \catcode36=3 % $ + \catcode38=7 % & SUPERSCRIPT for && as replacement of ^^ + \catcode39=12 % ' + \catcode40=12 % ( + \catcode41=12 % ) + \catcode42=12 % * + \catcode43=12 % + + \catcode44=12 % , + \catcode45=12 % - + \catcode46=12 % . + \catcode47=12 % / + \catcode58=11 % : LETTER + \catcode59=12 % ; + \catcode60=12 % < + \catcode61=12 % = + \catcode62=12 % > + \catcode63=11 % ? LETTER + \catcode64=11 % @ LETTER + \catcode91=12 % [ + \catcode93=12 % ] + \catcode94=11 % ^ LETTER + \catcode95=11 % _ LETTER + \catcode96=12 % ` + \catcode123=1 % { + \catcode124=12 % | + \catcode125=2 % } + \catcode126=3 % ~ MATH SHIFT + \endlinechar=13 % }% - \let\XINT_setcatcodes\XINTsetcatcodes - \let\XINT_restorecatcodes\XINTrestorecatcodes \XINTsetcatcodes }% \PrepareCatcodes @@ -159,7 +154,7 @@ \fi \XINT_providespackage \ProvidesPackage {xintkernel}% - [2022/05/18 v1.4k Paraphernalia for the xint packages (JFB)]% + [2022/05/29 v1.4l Paraphernalia for the xint packages (JFB)]% \chardef\xint_c_ 0 \chardef\xint_c_i 1 \chardef\xint_c_ii 2 |