Expl3: Расширение отображений по спискам

Question

Пакет xcolorможет «подготавливать» определения цветов таким образом, что они загружаются только в том случае, если они действительно необходимы, что может быть указано в последующем вызове, например \providecolors{<id-list>}, .

Пакет также содержит удобные команды для определения большого набора цветов, имеющих общий префикс/суффикс: \preparecolorset{HTML}{<prefix>}{<suffix>}{red,ff0000;blue,0000ff}подготавливает цвета <prefix>red<suffix>и <prefix>blue<suffix>.

Затем эти цвета можно загрузить, вызвав \providecolors{<prefix>red<suffix>,<prefix>blue<suffix>}.

Я пытаюсь реализовать удобную команду, чтобы избежать необходимости повторно писать общий префикс и суффикс цветов. Синтаксис будет таким \ProvideColorsFromSet{<prefix>}{<suffix>}{<list>}: .

Однако приведенный ниже код, который я считал довольно простым, выдает ошибки Undefined color 'my-red'и Undefined color 'my-blue'.

Я предполагаю, что проблема связана с расширением, поэтому я пробовал разные комбинации \exp_args:...и \exp_not:...(безДействительнозная, что я делаю), но безрезультатно. Я также пытался преобразовать в clist, seqи использовать \..._map_functionвместо \..._map_inline, но безуспешно.

Любая помощь будет оценена по достоинству. Спасибо!

\documentclass{article}
\usepackage{xparse}
\usepackage{xcolor}
\definecolorsfalse
\preparecolorset{HTML}{my-}{}{red,ff0000;blue,0000ff}

\ExplSyntaxOn
\NewDocumentCommand { \ProvideColorsFromSet } { m m m } {
    \clist_set:Nn \l_tmpa_clist { #3 }
    % \exp_args:NNx \clist_set:Nn \l_tmpa_clist { #3 }
    % \clist_set:Nn \l_tmpa_clist { \exp_not:n #3 }
    \clist_map_inline:Nn \l_tmpa_clist { #1##1#2 }
    \tl_set:Nn \l_tmpa_tl { \clist_use:Nn \l_tmpa_clist {,} }
    \providecolors{ \tl_use:N \l_tmpa_tl }
    % \exp_args:NV \providecolors{ \l_tmpa_tl }
    % \providecolors{ \l_tmpa_tl }
    % \providecolors{ \exp_not:N \l_tmpa_tl }
    % \providecolors{ \exp_args:NV \exp_not:N \l_tmpa_tl } % hmm...
    % \exp_args:Nx \providecolors{ \l_tmpa_tl }
    % \exp_args:Nx \providecolors{ \tl_use:N \l_tmpa_tl }
}
\ExplSyntaxOff

\ProvideColorsFromSet{my-}{}{red,blue}

\begin{document}

\textcolor{my-red}{red}
\textcolor{my-blue}{blue}
    
\end{document}

---

Приложение:

Значение\providecolorsв xcolor:

\def\XC@preparec@lor[#1]#2[#3]#4#5%
 {\XC@sdef\@@cls{#1}\XC@edef\@@nam{#2}%
  \XC@getmodclr01{#4}{#5}{}%
   {\xdef\XC@@stack
     {\ifx\XC@@stack\@empty\else\XC@@stack,\fi{#1}{\@@nam}{#3}%
      {\ifx\@@Mod\XC@mod@ignore\@@mod\else\@@Mod\fi}{\@@clr}}}}

\let\XC@@stack\@empty

\def\XC@definecolors#1,%
 {\@ifxempty{#1}{}{\expandafter\XC@definec@lors#1=#1=:\XC@definecolors}}

\def\XC@definec@lors#1=#2=#3:%
 {\XC@edef\@@nam{#1}\XC@edef\@@arg{#2}%
  \let\next\XC@definec@l@rs\expandafter\next\XC@@stack,,\@nnil}

\def\XC@definec@l@rs#1,%
 {\ifx,#1,\let\next\remove@to@nnil\else\XC@defin@c@l@rs#1\fi\next}

\def\XC@defin@c@l@rs#1#2#3#4#5%
 {\def\@@tmp{#2}%
  \ifx\@@tmp\@@arg
    \let\xglobal@\XC@@glb\XC@@cmd[#1]{\@@nam}[#3]{#4}{#5}%
    \let\next\remove@to@nnil
  \fi}

\def\providecolors#1%
 {\let\XC@@cmd\providecolor\let\XC@@glb\xglobal@
  \expandafter\XC@definecolors#1,,}

Answer 1

Вы хотите построить список clistиз заданного третьего аргумента, в котором каждый элемент имеет префикс и суффикс, как указано первым и вторым аргументами, а затем передать список в \providecolors.

\documentclass{article}
%\usepackage{xparse}% no longer needed
\usepackage{xcolor}
\definecolorsfalse
\preparecolorset{HTML}{my-}{}{red,ff0000;blue,0000ff}

\ExplSyntaxOn
\NewDocumentCommand { \ProvideColorsFromSet } { m m m }
  {
    \clist_clear:N \l_tmpa_clist
    \clist_map_inline:nn { #3 }
      {
        \clist_put_right:Nn \l_tmpa_clist { #1##1#2 }
      }
    \exp_args:NV \providecolors \l_tmpa_clist
  }
\ExplSyntaxOff

\ProvideColorsFromSet{my-}{}{red,blue}

\begin{document}

\textcolor{my-red}{red}
\textcolor{my-blue}{blue}
    
\end{document}