[latex3-commits] [git/LaTeX3-latex3-pdfresources] renamedict77: restore xform tests (72aa2ff)

[Ulrike Fischer]

Repository : https://github.com/latex3/pdfresources
On branch  : renamedict77
Link       : https://github.com/latex3/pdfresources/commit/72aa2ff0eb6c297a623f92d2325058dbcf5cd6c4

>---------------------------------------------------------------

commit 72aa2ff0eb6c297a623f92d2325058dbcf5cd6c4
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Wed Apr 29 23:39:42 2020 +0200

    restore xform tests


>---------------------------------------------------------------

72aa2ff0eb6c297a623f92d2325058dbcf5cd6c4
 pdfresources.dtx | 22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

diff --git a/pdfresources.dtx b/pdfresources.dtx
index 9c98e4c..da97860 100644
--- a/pdfresources.dtx
+++ b/pdfresources.dtx
@@ -2796,6 +2796,16 @@
 %    These command give back the sizes of the XObject. The values are stored in
 %    tl-variables with the unit pt and not in dimensions!
 %   \end{function}
+%   \begin{function}[EXP,pTF,added = 220-04-29]
+%     {
+%       \pdf_xform_if_exist:n
+%     }
+%   \begin{syntax}
+%     \cs{pdf_xform_if_exist_p:n} \Arg{name}
+%     \cs{pdf_xform_if_exist:NTF} \meta{name} \Arg{true code} \Arg{false code}
+%   \end{syntax}
+%    These command tests if an xform with name \Arg{name} has been already defined.
+%   \end{function}%
 %    \begin{macrocode}
 \cs_new_protected:Npn  \pdf_xform_new:nnn #1 #2 #3
   {
@@ -3102,6 +3112,16 @@
        \box_use_drop:N \l_@@_tmpa_box
      }
   }
+%% all
+\prg_new_conditional:Npnn \@@_backend_xform_if_exist:n #1 { p , T , F , TF }
+  {
+    \int_if_exist:cTF { c_@@_backend_xform_ \tl_to_str:n {#1} _int }
+     { \prg_return_true: }
+     { \prg_return_false:}
+  }
+\prg_new_eq_conditional:NNn \pdf_xform_if_exist:n\@@_backend_xform_if_exist:n
+  { TF , T , F , p }
+
 %    \end{macrocode}
 % \end{macro}
 % \end{macro}
@@ -3188,7 +3208,7 @@
 
 
 %    \end{macrocode}
-% \subsection{Annotations, help tools}
+%% \subsection{Annotations, help tools}
 % \begin{variable}{ \c_pdfannot_flags_prop }
 % This property list maps keys like \enquote{Invisible} to the
 % bit positions for the /F-flag. It can be used