[latex3-commits] [git/LaTeX3-latex3-latex3] unicode-data: Use new \codepoint_str_generate:n in l3str (15d84fa92)

[Joseph Wright]

Repository : https://github.com/latex3/latex3
On branch  : unicode-data
Link       : https://github.com/latex3/latex3/commit/15d84fa928e2c26386211fd8b617716336dcf340

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

commit 15d84fa928e2c26386211fd8b617716336dcf340
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Sun Oct 9 18:08:31 2022 +0100

    Use new \codepoint_str_generate:n in l3str


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

15d84fa928e2c26386211fd8b617716336dcf340
 l3kernel/l3str.dtx | 40 +++-------------------------------------
 1 file changed, 3 insertions(+), 37 deletions(-)

diff --git a/l3kernel/l3str.dtx b/l3kernel/l3str.dtx
index c7237635c..7540392c4 100644
--- a/l3kernel/l3str.dtx
+++ b/l3kernel/l3str.dtx
@@ -1914,8 +1914,6 @@
 % \begin{macro}[EXP]{\@@_change_case_codepoint:nNNNN}
 % \begin{macro}[EXP]{\@@_change_case_char:nnn, \@@_change_case_char_aux:nnn}
 % \begin{macro}[EXP]{\@@_change_case_char:nnnnn}
-% \begin{macro}[EXP]{\@@_change_case_generate:n}
-% \begin{macro}[EXP]{\@@_change_case_generate:nnnn}
 %   Case changing for programmatic reasons is done by first detokenizing
 %   input then doing a simple loop that only has to worry about spaces
 %   and everything else. The output is detokenized to allow data sharing
@@ -2035,45 +2033,15 @@
     \int_compare:nNnTF {#1} = {#4}
       { \tl_to_str:n {#5} }
       {
-        \@@_change_case_generate:n {#1}
+        \codepoint_str_generate:n {#1}
         \tl_if_blank:nF {#2}
           {
-            \@@_change_case_generate:n {#2}
+            \codepoint_str_generate:n {#2}
             \tl_if_blank:nF {#3}
-             { \@@_change_case_generate:n {#3} }
+             { \codepoint_str_generate:n {#3} }
           }
       }
   }
-\if_int_compare:w 0
-  \cs_if_exist:NT \tex_XeTeXversion:D { 1 }
-  \cs_if_exist:NT \tex_luatexversion:D { 1 }
-  > 0 \exp_stop_f:
-  \cs_new:Npn \@@_change_case_generate:n #1
-    { \char_generate:nn {#1} { 12 } }
-\else:
-  \cs_new:Npn \@@_change_case_generate:n #1
-    {
-      \use:e
-        {
-          \exp_not:N \@@_change_case_generate:nnnn
-            \codepoint_to_bytes:n {#1}
-        }
-    }
-  \cs_new:Npn \@@_change_case_generate:nnnn #1#2#3#4
-    {
-      \char_generate:nn {#1} { 12 }
-      \tl_if_blank:nF {#2}
-        {
-          \char_generate:nn {#2} { 12 }
-          \tl_if_blank:nF {#3}
-            {
-              \char_generate:nn {#3} { 12 }
-              \tl_if_blank:nF {#4}
-                { \char_generate:nn {#4} { 12 } }
-            }
-        }
-    }
-\fi:
 %    \end{macrocode}
 % \end{macro}
 % \end{macro}
@@ -2090,8 +2058,6 @@
 % \end{macro}
 % \end{macro}
 % \end{macro}
-% \end{macro}
-% \end{macro}
 %
 % \begin{variable}
 %   {