From 36afb13206c5cf659854dce54a7e001273ca71e9 Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Tue, 27 Oct 2020 20:55:42 +0000
Subject: l3 (27oct20)

git-svn-id: svn://tug.org/texlive/trunk@56785 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/texmf-dist/tex/latex/l3kernel/l3debug.def | 20 +++++++++-----------
 1 file changed, 9 insertions(+), 11 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/l3kernel/l3debug.def')

diff --git a/Master/texmf-dist/tex/latex/l3kernel/l3debug.def b/Master/texmf-dist/tex/latex/l3kernel/l3debug.def
index e995f3daa77..d597ed9713c 100644
--- a/Master/texmf-dist/tex/latex/l3kernel/l3debug.def
+++ b/Master/texmf-dist/tex/latex/l3kernel/l3debug.def
@@ -71,7 +71,7 @@
   }
 \cs_set_protected:Npn \debug_resume:
   {
-    \tl_set:Nx \l__debug_suspended_tl
+    \__kernel_tl_set:Nx \l__debug_suspended_tl
       { \tl_tail:N \l__debug_suspended_tl }
     \tl_if_empty:NT \l__debug_suspended_tl
       {
@@ -213,11 +213,11 @@
 \tl_new:N \l__debug_tmpb_tl
 \cs_new_protected:Npn \__debug_generate_parameter_list:NNN #1#2#3
   {
-    \tl_set:Nx \l__debug_internal_tl
+    \__kernel_tl_set:Nx \l__debug_internal_tl
       { \exp_last_unbraced:Nf \use_ii:nnn \cs_split_function:N #1 }
-    \tl_set:Nx #2
+    \__kernel_tl_set:Nx #2
       { \exp_args:NV \__debug_build_parm_text:n \l__debug_internal_tl }
-    \tl_set:Nx #3
+    \__kernel_tl_set:Nx #3
       { \exp_args:NV \__debug_build_arg_list:n \l__debug_internal_tl }
   }
 \cs_new:Npn \__debug_build_parm_text:n #1
@@ -423,6 +423,8 @@
       \tl_concat:NNN
       \tl_gconcat:NNN
     }
+\cs_gset_protected:Npn \__kernel_tl_set:Nx  { \cs_set_nopar:Npx }
+\cs_gset_protected:Npn \__kernel_tl_gset:Nx { \cs_gset_nopar:Npx }
   \__kernel_patch:nnn
     { \__kernel_chk_var_local:N #1 }
     { }
@@ -463,9 +465,7 @@
       \skip_set_eq:NN
       \skip_add:Nn
       \skip_sub:Nn
-      \tl_set:Nn
-      \tl_set:No
-      \tl_set:Nx
+      \__kernel_tl_set:Nx
       \tl_set_eq:NN
       \tl_put_left:Nn
       \tl_put_left:NV
@@ -527,9 +527,7 @@
       \skip_gset_eq:NN
       \skip_gadd:Nn
       \skip_gsub:Nn
-      \tl_gset:Nn
-      \tl_gset:No
-      \tl_gset:Nx
+      \__kernel_tl_gset:Nx
       \tl_gset_eq:NN
       \tl_gput_left:Nn
       \tl_gput_left:NV
@@ -650,7 +648,7 @@
     {
       \__regex_trace_push:nnN { regex } { 1 } \__regex_escape_use:nnnn
       \group_begin:
-        \tl_set:Nx \l__regex_internal_a_tl
+        \__kernel_tl_set:Nx \l__regex_internal_a_tl
           { \__regex_trace_pop:nnN { regex } { 1 } \__regex_escape_use:nnnn }
         \use_none:nnn
     }
-- 
cgit v1.2.3

