[latex3-commits] [l3svn] 01/03: Replace \tex_lowercase:D where possible in xparse

[noreply at latex-project.org]

This is an automated email from the git hooks/post-receive script.

joseph pushed a commit to branch master
in repository l3svn.

commit 6a98baa0a3ecb26637e4f420552631bd73d1ea24
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Fri Mar 25 21:26:26 2016 +0000

    Replace \tex_lowercase:D where possible in xparse
---
 l3packages/xparse/xparse.dtx |   15 ++++-----------
 1 file changed, 4 insertions(+), 11 deletions(-)

diff --git a/l3packages/xparse/xparse.dtx b/l3packages/xparse/xparse.dtx
index 7150b65..0e1c0e4 100644
--- a/l3packages/xparse/xparse.dtx
+++ b/l3packages/xparse/xparse.dtx
@@ -2008,13 +2008,8 @@
 %    \begin{macrocode}
         \token_if_eq_catcode:NNTF + #1
           {
-            \group_begin:
-              \char_set_lccode:nn { `A } { `#1 }
-              \tex_lowercase:D
-                {
-                  \group_end:
-                  \l_@@_fn_tl A
-                }
+            \exp_after:wN \exp_after:wN \exp_after:wN
+              \l_@@_fn_tl \char_generate:nn { `#1 } { 11 }
           }
           {
             \exp_after:wN \l_@@_fn_tl
@@ -2654,10 +2649,8 @@
   {
     \@@_grab_v_group_end:
     \@@_add_arg:o \c_@@_no_value_tl
-    \group_begin:
-    \char_set_lccode:nn { `\# } { \tex_endlinechar:D }
-    \tex_lowercase:D
-      { \group_end: \peek_meaning_remove:NTF ## }
+    \exp_after:wN \exp_after:wN \exp_after:wN
+      \peek_meaning_remove:NTF \char_generate:nn { \tex_endlinechar:D } { 6 }
       {
         \__msg_kernel_error:nnxxx { xparse } { verbatim-newline }
           { \exp_after:wN \token_to_str:N \l_@@_fn_tl }

-- 
To stop receiving notification emails like this one, please contact
the administrator of this repository.