From af82aa955d92ac23a716670104c7da69f69db008 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 4 Jul 2020 20:48:00 +0000 Subject: expkv-def (4jul20) git-svn-id: svn://tug.org/texlive/trunk@55749 c570f23f-e606-0410-a88d-b1316a301751 --- .../source/latex/expkv-def/expkv-def.dtx | 83 ++++++++++++++-------- 1 file changed, 54 insertions(+), 29 deletions(-) (limited to 'Master/texmf-dist/source/latex/expkv-def') diff --git a/Master/texmf-dist/source/latex/expkv-def/expkv-def.dtx b/Master/texmf-dist/source/latex/expkv-def/expkv-def.dtx index 437c296d147..3dfff1f80f9 100644 --- a/Master/texmf-dist/source/latex/expkv-def/expkv-def.dtx +++ b/Master/texmf-dist/source/latex/expkv-def/expkv-def.dtx @@ -354,7 +354,9 @@ and the derived files expkv-def.pdf % commands which execute the |true| or |false| choice will be, so the usage % should be safe in an expansion context (\emph{e.g.}, you can use % \texttt{edefault \key\ = false} without an issue to change the default -% behaviour to execute the |false| choice). +% behaviour to execute the |false| choice). Internally a |bool| \key\ is the +% same as a |choice| key which is set up to handle |true| and |false| as +% choices. % \end{function} % % \begin{function}{store,estore,gstore,xstore} @@ -501,7 +503,20 @@ and the derived files expkv-def.pdf % \meta{definition} will be left in the input stream. You can make % individual values |protected| inside the \val=\meta{definition} list. By % default a |choice| key is expandable, an undefined \val\ will throw an error -% in an expandable way. +% in an expandable way (but see the |unknown-choice| prefix). You can add +% additional choices after the \key\ was created by using |choice| again for +% the same \key, redefining choices is possible the same way, but there is no +% interface to remove certain choices. +% \end{function} +% +% \begin{function}{unknown-choice} +% \begin{syntax} +% unknown-choice \key\ = \marg{definition} \prefixes23 +% \end{syntax} +% By default an unknown \val\ passed to a |choice| key will throw an error. +% However, with this prefix you can define an alternative action which should +% be executed if \key\ received an unknown choice. In \meta{definition} you +% can refer to the choice which was passed in with |#1|. % \end{function} % % \subsection{Bugs} @@ -669,8 +684,8 @@ and the derived files expkv-def.pdf % \begin{macro}{\ekvdVersion,\ekvdDate} % We're on our first input, so lets store the version and date in a macro. % \begin{macrocode} -\def\ekvdVersion{0.3} -\def\ekvdDate{2020-04-29} +\def\ekvdVersion{0.4} +\def\ekvdDate{2020-07-04} % \end{macrocode} % \end{macro} % @@ -1280,6 +1295,20 @@ and the derived files expkv-def.pdf % \end{macrocode} % \end{macro} % +% \begin{macro}[internal]{\ekvd@t@unknown-choice} +% \begin{macrocode} +\protected\long\expandafter\def\csname ekvd@t@unknown-choice\endcsname#1#2% + {% + \ekvd@assert@arg{unknown-choice #1}{#2}% + {% + \ekvd@assert@not@long{unknown-choice #1}% + \ekvd@prot\expandafter + \def\csname\ekvd@unknown@choice@name\ekvd@set{#1}\endcsname##1{#2}% + }% + } +% \end{macrocode} +% \end{macro} +% % \subsubsection{Key Type Helpers} % There are some keys that might need helpers during their execution (not during % their definition, which are gathered as |@type@| macros). These helpers are @@ -1309,23 +1338,6 @@ and the derived files expkv-def.pdf % % \subsubsection{Tests} % -% \begin{macro}[internal]{\ekvd@noarg@mark} -% This macro serves as a flag for the case that no \val\ was specified for a -% key. As such it is not a test, but exists only for some tests. -% \begin{macrocode} -\def\ekvd@noarg@mark{\ekvd@noarg@mark} -% \end{macrocode} -% \end{macro} -% -% \begin{macro}[internal]{\ekvd@fi@firstoftwo} -% While we can reuse many of the internals of \expkv\ the specific case for this -% branch wasn't needed by \expkv\ and hence isn't defined. We'll need it, so we -% define it. -% \begin{macrocode} -\long\def\ekvd@fi@firstoftwo\fi\@secondoftwo#1#2{\fi#1} -% \end{macrocode} -% \end{macro} -% % \begin{macro}[internal]{\ekvd@newlet,\ekvd@newreg} % These macros test whether a control sequence is defined, if it isn't they % define it, either via |\let| or via the correct \cs[no-index]{new\meta{reg}}. @@ -1362,8 +1374,11 @@ and the derived files expkv-def.pdf % \end{macrocode} % \end{macro} % -% \begin{macro}[internal]{\ekvd@assert@arg,\ekvd@ifnoarg} -% The test for an argument is just an |\ifx| comparison with our |noarg@mark|. +% \begin{macro}[internal] +% {\ekvd@assert@arg,\ekvd@ifnoarg,\ekvd@ifnoarg@,\ekvd@ifnoarg@} +% An |\ifx| comparison would fail if the first token of the user input is a +% \TeX-if primitive or the user input contains unbalanced \TeX-if constructs, so +% the test is done using \TeX's argument grabbing logic. % \begin{macrocode} \long\def\ekvd@assert@arg#1#2% {% @@ -1372,10 +1387,14 @@ and the derived files expkv-def.pdf } \long\def\ekvd@ifnoarg#1% {% - \ifx\ekvd@noarg@mark#1% - \ekvd@fi@firstoftwo - \fi - \@secondoftwo + \ekvd@ifnoarg@\ekvd@ifnoarg@mark#1\ekvd@ifnoarg@mark\ekvd@ifnoarg@t + \ekvd@ifnoarg@mark\ekvd@noarg@mark\ekvd@ifnoarg@mark\@secondoftwo + } +\long\def\ekvd@ifnoarg@#1\ekvd@ifnoarg@mark\ekvd@noarg@mark\ekvd@ifnoarg@mark{} +\long\def\ekvd@ifnoarg@t + \ekvd@ifnoarg@mark\ekvd@noarg@mark\ekvd@ifnoarg@mark\@secondoftwo#1#2% + {% + #1% } % \end{macrocode} % \end{macro} @@ -1465,7 +1484,7 @@ and the derived files expkv-def.pdf % \begin{macro}[internal] % { % \ekvd@err@choice@invalid,\ekvd@err@choice@invalid@,\ekvd@choice@name, -% \ekvd@err +% \ekvd@unknown@choice@name,\ekvd@err % } % The expandable error messages use |\ekvd@err|, which is just like |\ekv@err| % from \expkv\ or the way \pkg{expl3} throws expandable error messages. It uses @@ -1487,9 +1506,15 @@ and the derived files expkv-def.pdf {% ekvd#1(#2)#3% } +\def\ekvd@unknown@choice@name#1#2% + {% + ekvd:u:#1(#2)% + } \def\ekvd@err@choice@invalid@ ekvd#1(#2)#3\ekv@stop% {% - \ekvd@err{invalid choice `#3' (`#2', set `#1')}% + \ekv@ifdefined{\ekvd@unknown@choice@name{#1}{#2}}% + {\csname\ekvd@unknown@choice@name{#1}{#2}\endcsname{#3}}% + {\ekvd@err{invalid choice `#3' (`#2', set `#1')}}% } } \begingroup -- cgit v1.2.3