[latex3-commits] [latex3/latex3] develop: Make \c_catcode_active_tl internal (fixes #1436) (b20e7dc17)

[github at latex-project.org]

Repository : https://github.com/latex3/latex3
On branch  : develop
Link       : https://github.com/latex3/latex3/commit/b20e7dc17ca44aeae1ead50d8f76e0cee2476067

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

commit b20e7dc17ca44aeae1ead50d8f76e0cee2476067
Author: Joseph Wright <joseph at texdev.net>
Date:   Tue Nov 12 14:25:15 2024 +0000

    Make \c_catcode_active_tl internal (fixes #1436)
    
    Normally we'd leave this public, but this is basically an oversight and
    unused in TL, so we directly tidy up.


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

b20e7dc17ca44aeae1ead50d8f76e0cee2476067
 l3kernel/CHANGELOG.md |  3 +++
 l3kernel/l3token.dtx  | 16 +++++-----------
 2 files changed, 8 insertions(+), 11 deletions(-)

diff --git a/l3kernel/CHANGELOG.md b/l3kernel/CHANGELOG.md
index 43fd6e351..45458031e 100644
--- a/l3kernel/CHANGELOG.md
+++ b/l3kernel/CHANGELOG.md
@@ -10,6 +10,9 @@ this project uses date-based 'snapshot' version identifiers.
 ### Added
 - `\sys_if_engine_opentype:(TF)`
 
+### Removed
+- `\c_catcode_active_tl`: was missing a `_`, always intended to be internal
+
 ## [2024-11-02]
 
 ### Added
diff --git a/l3kernel/l3token.dtx b/l3kernel/l3token.dtx
index 8dc792cab..6093dc3e1 100644
--- a/l3kernel/l3token.dtx
+++ b/l3kernel/l3token.dtx
@@ -443,12 +443,6 @@
 %   not be used other than for category code tests.
 % \end{variable}
 %
-% \begin{variable}{\c_catcode_active_tl}
-%   A token list containing an active token. This is used internally
-%   for test purposes and should not be used other than in
-%   appropriately-constructed category code tests.
-% \end{variable}
-%
 % \section{Converting tokens}
 %
 % \begin{function}[EXP]{\token_to_meaning:N, \token_to_meaning:c}
@@ -1833,12 +1827,12 @@
 %    \end{macrocode}
 % \end{macro}
 %
-% \begin{variable}{\c_catcode_active_tl}
+% \begin{variable}{\c_@@_active_tl}
 %   Not an implicit token!
 %    \begin{macrocode}
 \group_begin:
   \char_set_catcode_active:N \*
-  \tl_const:Nn \c_catcode_active_tl { \exp_not:N * }
+  \tl_const:Nn \c_@@_active_tl { \exp_not:N * }
 \group_end:
 %    \end{macrocode}
 % \end{variable}
@@ -1975,13 +1969,13 @@
 %
 % \begin{macro}[pTF]{\token_if_active:N}
 %   Check if token is an active char token. We use the constant
-%   \cs{c_catcode_active_tl} for this. A technical point is that
-%   \cs{c_catcode_active_tl} is in fact a macro expanding to
+%   \cs{c_@@_active_tl} for this. A technical point is that
+%   \cs{c_@@_active_tl} is in fact a macro expanding to
 %   |\exp_not:N *|, where |*| is active.
 %    \begin{macrocode}
 \prg_new_conditional:Npnn \token_if_active:N #1 { p , T ,  F , TF }
   {
-    \if_catcode:w \exp_not:N #1 \c_catcode_active_tl
+    \if_catcode:w \exp_not:N #1 \c_@@_active_tl
       \prg_return_true: \else: \prg_return_false: \fi:
   }
 %    \end{macrocode}