[latex3-commits] [git/LaTeX3-latex3-latex3] master: faster tl_act end test (271612bc8)

[Bruno Le Floch]

Repository : https://github.com/latex3/latex3
On branch  : master
Link       : https://github.com/latex3/latex3/commit/271612bc80268bfcb243f748572ab899e77cc66b

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

commit 271612bc80268bfcb243f748572ab899e77cc66b
Author: Jonathan Spratte <jspratte at yahoo.de>
Date:   Sun Aug 9 20:33:15 2020 +0200

    faster tl_act end test


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

271612bc80268bfcb243f748572ab899e77cc66b
 l3kernel/l3tl.dtx | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/l3kernel/l3tl.dtx b/l3kernel/l3tl.dtx
index 59a18e5b0..494777c01 100644
--- a/l3kernel/l3tl.dtx
+++ b/l3kernel/l3tl.dtx
@@ -2797,13 +2797,12 @@
   }
 \cs_new:Npn \@@_act_normal:NwnNNN #1 #2 \q_@@_act_stop #3#4
   {
-    \if_meaning:w \q_@@_act_mark #1
-      \exp_after:wN \@@_act_end:wn
-    \fi:
+    \@@_use_none_delimit_by_act_mark:w #1 \@@_act_end:wn \q_@@_act_mark
     #4 {#3} #1
     \@@_act_loop:w #2 \q_@@_act_stop
     {#3} #4
   }
+\cs_new:Npn \@@_use_none_delimit_by_act_mark:w #1 \q_@@_act_mark { }
 \cs_new:Npn \@@_act_end:wn #1 \@@_act_result:n #2
   { \group_align_safe_end: \exp_end: #2 }
 \cs_new:Npn \@@_act_group:nwnNNN #1 #2 \q_@@_act_stop #3#4#5
@@ -3068,11 +3067,11 @@
 \cs_new:Npn \@@_if_head_eq_meaning_special:nN #1 #2
   {
     \if_charcode:w \str_head:n {#1} \exp_not:N #2
-      \exp_after:wN \use:n
+      \exp_after:wN \use_ii:nn
     \else:
       \prg_return_false:
-      \exp_after:wN \use_none:n
     \fi:
+    \use_none:n
     {
       \if_catcode:w \exp_not:N #2
                     \tl_if_head_is_group:nTF {#1}