From e0c5d6d38a1f285f20a66692e46d2e607d6ff1dd Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Sun, 14 May 2017 22:40:58 +0000
Subject: l3 (14may17)

git-svn-id: svn://tug.org/texlive/trunk@44351 c570f23f-e606-0410-a88d-b1316a301751
---
 .../latex/l3experimental/l3str/l3str-convert.sty   | 38 +++-------------------
 1 file changed, 4 insertions(+), 34 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-convert.sty')

diff --git a/Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-convert.sty b/Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-convert.sty
index d7998754945..b7216bd406a 100644
--- a/Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-convert.sty
+++ b/Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-convert.sty
@@ -6,7 +6,7 @@
 %%
 %% l3str-convert.dtx  (with options: `package')
 %% 
-%% Copyright (C) 2011-2016 The LaTeX3 Project
+%% Copyright (C) 2011-2017 The LaTeX3 Project
 %% 
 %% It may be distributed and/or modified under the conditions of
 %% the LaTeX Project Public License (LPPL), either version 1.3c of
@@ -20,7 +20,7 @@
 %% 
 %% File: l3str-convert.dtx Copyright (C) 2013-2017 The LaTeX3 Project
 \RequirePackage{expl3}
-\ProvidesExplPackage{l3str-convert}{2017/04/01}{}
+\ProvidesExplPackage{l3str-convert}{2017/05/13}{}
   {L3 Experimental string encoding conversions}
 \RequirePackage{l3tl-analysis,l3tl-build}
 \cs_if_exist:NF \use_ii_i:nn
@@ -31,10 +31,6 @@
 \tl_new:N \g__str_result_tl
 \int_const:Nn \c__str_replacement_char_int { "FFFD }
 \int_const:Nn \c__str_max_byte_int { 255 }
-\int_const:Nn \c__str_ascii_min_int { 0 }
-\int_const:Nn \c__str_ascii_max_control_int { 31 }
-\int_const:Nn \c__str_ascii_max_int { 127 }
-\int_const:Nn \c__str_ascii_lower_int { `a - `A }
 \prop_new:N \g__str_alias_prop
 \prop_gput:Nnn \g__str_alias_prop { latin1 } { iso88591 }
 \prop_gput:Nnn \g__str_alias_prop { latin2 } { iso88592 }
@@ -54,32 +50,6 @@
 \bool_new:N \g__str_error_bool
 \flag_new:n { str_byte }
 \flag_new:n { str_error }
-\group_begin:
-\char_set_lccode:nn { `\* } { `\  }
-\char_set_lccode:nn { `\A } { `\A }
-\tex_lowercase:D
-  {
-    \group_end:
-    \cs_new_protected:Npn \__str_gset_other:Nn #1#2
-      {
-        \tl_gset:Nx #1
-          {
-            \exp_after:wN \__str_gset_other_loop:w \tl_to_str:n {#2} ~ %
-            A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ \q_stop
-          }
-      }
-    \cs_new:Npn \__str_gset_other_loop:w
-      #1 ~ #2 ~ #3 ~ #4 ~ #5 ~ #6 ~ #7 ~ #8 ~ #9 ~
-      {
-        \if_meaning:w A #9
-          \__str_gset_other_end:w
-        \fi:
-        #1 * #2 * #3 * #4 * #5 * #6 * #7 * #8 * #9
-        \__str_gset_other_loop:w *
-      }
-    \cs_new:Npn \__str_gset_other_end:w \fi: #1 * A #2 \q_stop
-      { \fi: #1 }
-  }
 \prg_new_conditional:Npnn \__str_if_contains_char:NN #1#2 { T , TF }
   {
     \exp_after:wN \__str_if_contains_char_aux:NN \exp_after:wN #2
@@ -245,7 +215,7 @@
   {
     \group_begin:
       #1
-      \__str_gset_other:Nn \g__str_result_tl {#4}
+      \tl_gset:Nx \g__str_result_tl { \__str_to_other_fast:n {#4} }
       \exp_after:wN \__str_convert:wwwnn
         \tl_to_str:n {#5} /// \q_stop
         { decode } { unescape }
@@ -335,7 +305,7 @@
           #1
         \fi:
       \else:
-        \__str_output_byte:n { `#1 + \c__str_ascii_lower_int }
+        \__str_output_byte:n { `#1 + `a - `A }
       \fi:
     \fi:
     \__str_convert_lowercase_alphanum_loop:N
-- 
cgit v1.2.3

