summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/l3kernel/l3debug.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/l3kernel/l3debug.dtx')
-rw-r--r--macros/latex/contrib/l3kernel/l3debug.dtx113
1 files changed, 57 insertions, 56 deletions
diff --git a/macros/latex/contrib/l3kernel/l3debug.dtx b/macros/latex/contrib/l3kernel/l3debug.dtx
index d700a0f021..8efdc986cc 100644
--- a/macros/latex/contrib/l3kernel/l3debug.dtx
+++ b/macros/latex/contrib/l3kernel/l3debug.dtx
@@ -43,7 +43,7 @@
% }^^A
% }
%
-% \date{Released 2023-08-29}
+% \date{Released 2023-10-10}
%
% \maketitle
%
@@ -108,12 +108,12 @@
% \cs{flag_if_exist_p:n}, and if not raises a kernel-level error.
% \end{function}
%
-% \begin{function}{\__kernel_debug_log:x}
+% \begin{function}{\__kernel_debug_log:e}
% \begin{syntax}
-% \cs{__kernel_debug_log:x} \Arg{message text}
+% \cs{__kernel_debug_log:e} \Arg{message text}
% \end{syntax}
% If the \texttt{log-functions} option is active, this function writes
-% the \meta{message text} to the log file using \cs{iow_log:x}.
+% the \meta{message text} to the log file using \cs{iow_log:e}.
% Otherwise, the \meta{message text} is ignored using \cs{use_none:n}.
% This function is only created if debugging is enabled.
% \end{function}
@@ -220,7 +220,7 @@
}
\cs_set_protected:Npn \debug_resume:
{
- \__kernel_tl_set:Nx \l_@@_suspended_tl
+ \__kernel_tl_set:Ne \l_@@_suspended_tl
{ \tl_tail:N \l_@@_suspended_tl }
\tl_if_empty:NT \l_@@_suspended_tl
{
@@ -269,7 +269,7 @@
\@@_suspended:T \use_none:nnn
\cs_if_exist:NF ##1
{
- \msg_error:nnx { debug } { non-declared-variable }
+ \msg_error:nne { debug } { non-declared-variable }
{ \token_to_str:N ##1 }
}
}
@@ -278,7 +278,7 @@
\@@_suspended:T \use_none:nnn
\cs_if_exist:NF ##1
{
- \msg_error:nnx { kernel } { command-not-defined }
+ \msg_error:nne { kernel } { command-not-defined }
{ \token_to_str:N ##1 }
}
}
@@ -362,7 +362,7 @@
\if:w #1 \scan_stop:
\cs_gset_nopar:Npn #1 {#2}
\else:
- \msg_error:nnxxx { debug } { local-global }
+ \msg_error:nneee { debug } { local-global }
{#1} {#2} { \iow_char:N \\ #3 }
\fi:
\fi:
@@ -374,19 +374,19 @@
% \end{macro}
%
% \begin{macro}{\@@_log-functions_on:, \@@_log-functions_off:}
-% \begin{macro}{\__kernel_debug_log:x}
+% \begin{macro}{\__kernel_debug_log:e}
% These two functions (corresponding to the \pkg{expl3} option
-% \texttt{log-functions}) control whether \cs{__kernel_debug_log:x}
+% \texttt{log-functions}) control whether \cs{__kernel_debug_log:e}
% writes to the log file or not. By default, logging is off.
% \begin{macrocode}
\cs_new_protected:cpn { @@_log-functions_on: }
{
- \cs_set_protected:Npn \__kernel_debug_log:x
- { \@@_suspended:T \use_none:nn \iow_log:x }
+ \cs_set_protected:Npn \__kernel_debug_log:e
+ { \@@_suspended:T \use_none:nn \iow_log:e }
}
\cs_new_protected:cpn { @@_log-functions_off: }
- { \cs_set_protected:Npn \__kernel_debug_log:x { \use_none:n } }
-\cs_new_protected:Npn \__kernel_debug_log:x { \use_none:n }
+ { \cs_set_protected:Npn \__kernel_debug_log:e { \use_none:n } }
+\cs_new_protected:Npn \__kernel_debug_log:e { \use_none:n }
% \end{macrocode}
% \end{macro}
% \end{macro}
@@ -510,11 +510,11 @@
% \begin{macrocode}
\cs_new_protected:Npn \@@_generate_parameter_list:NNN #1#2#3
{
- \__kernel_tl_set:Nx \l_@@_internal_tl
+ \__kernel_tl_set:Ne \l_@@_internal_tl
{ \exp_last_unbraced:Nf \use_ii:nnn \cs_split_function:N #1 }
- \__kernel_tl_set:Nx #2
+ \__kernel_tl_set:Ne #2
{ \exp_args:NV \@@_build_parm_text:n \l_@@_internal_tl }
- \__kernel_tl_set:Nx #3
+ \__kernel_tl_set:Ne #3
{ \exp_args:NV \@@_build_arg_list:n \l_@@_internal_tl }
}
\cs_new:Npn \@@_build_parm_text:n #1
@@ -658,7 +658,7 @@
{
\cs_gset_eq:cN { @@_ \cs_to_str:N #1 } #1
\@@_generate_parameter_list:NNN #1 \l_@@_tmpa_tl \l_@@_tmpb_tl
- \exp_args:Nx \tex_scantokens:D
+ \exp_args:Ne \tex_scantokens:D
{
\tex_global:D \cs_prefix_spec:N #1
\tex_def:D \exp_not:N #1
@@ -673,23 +673,23 @@
}
\cs_set_protected:Npn \@@_add_to_debug_code:Nnn #1#2#3
{
- \use:x
+ \use:e
{
\cs_set:Npn \exp_not:N \@@_tmp:w
- ####1 \tl_to_str:n { macro: }
- ####2 \tl_to_str:n { -> }
- ####3 \c_backslash_str \tl_to_str:n { @@_ }
+ ##1 \tl_to_str:n { macro: }
+ ##2 \tl_to_str:n { -> }
+ ##3 \c_backslash_str \tl_to_str:n { @@_ }
\cs_to_str:N #1
- ####4 \s_@@_stop
+ ##4 \s_@@_stop
{
- \exp_not:N \exp_args:Nx \exp_not:N \tex_scantokens:D
+ \exp_not:N \exp_args:Ne \exp_not:N \tex_scantokens:D
{
- \tex_global:D ####1
- \tex_def:D \exp_not:N #1 ####2
+ \tex_global:D ##1
+ \tex_def:D \exp_not:N #1 ##2
{
- ####3 \tl_to_str:n {#2}
+ ##3 \tl_to_str:n {#2}
\c_backslash_str @@_ \cs_to_str:N #1
- ####4 \tl_to_str:n {#3}
+ ##4 \tl_to_str:n {#3}
}
}
}
@@ -721,7 +721,7 @@
}
\cs_set_protected:Npn \@@_patch_weird:Nnn #1#2#3
{
- \use:x
+ \use:e
{
\tex_endlinechar:D -1 \scan_stop:
\exp_not:N \tex_scantokens:D
@@ -790,8 +790,8 @@
%
%
% \begin{macrocode}
-\cs_gset_protected:Npn \__kernel_tl_set:Nx { \cs_set_nopar:Npx }
-\cs_gset_protected:Npn \__kernel_tl_gset:Nx { \cs_gset_nopar:Npx }
+\cs_gset_protected:Npn \__kernel_tl_set:Ne { \cs_set_nopar:Npe }
+\cs_gset_protected:Npn \__kernel_tl_gset:Ne { \cs_gset_nopar:Npe }
% \end{macrocode}
%
% Patching where the first argument to a function needs scope-checking:
@@ -838,20 +838,21 @@
\skip_set_eq:NN
\skip_add:Nn
\skip_sub:Nn
- \__kernel_tl_set:Nx
+ \__kernel_tl_set:Ne
\tl_clear:N
\tl_set_eq:NN
\tl_put_left:Nn
\tl_put_left:NV
+ \tl_put_left:Nv
+ \tl_put_left:Ne
\tl_put_left:No
- \tl_put_left:Nx
\tl_put_right:Nn
\tl_put_right:NV
+ \tl_put_right:Nv
+ \tl_put_right:Ne
\tl_put_right:No
- \tl_put_right:Nx
\tl_build_begin:N
\tl_build_put_right:Nn
- \tl_build_put_right:Nx
\tl_build_put_left:Nn
\vbox_set:Nn
\vbox_set_top:Nn
@@ -902,20 +903,21 @@
\skip_gset_eq:NN
\skip_gadd:Nn
\skip_gsub:Nn
- \__kernel_tl_gset:Nx
+ \__kernel_tl_gset:Ne
\tl_gclear:N
\tl_gset_eq:NN
\tl_gput_left:Nn
\tl_gput_left:NV
+ \tl_gput_left:Nv
+ \tl_gput_left:Ne
\tl_gput_left:No
- \tl_gput_left:Nx
\tl_gput_right:Nn
\tl_gput_right:NV
+ \tl_gput_right:Nv
+ \tl_gput_right:Ne
\tl_gput_right:No
- \tl_gput_right:Nx
\tl_build_gbegin:N
\tl_build_gput_right:Nn
- \tl_build_gput_right:Nx
\tl_build_gput_left:Nn
\vbox_gset:Nn
\vbox_gset_top:Nn
@@ -940,7 +942,6 @@
\muskip_const:Nn
\skip_const:Nn
\tl_const:Nn
- \tl_const:Nx
}
% \end{macrocode}
%
@@ -991,7 +992,7 @@
\__kernel_patch:nnn
{ }
{
- \__kernel_debug_log:x
+ \__kernel_debug_log:e
{ Defining~\token_to_str:N #1~ \msg_line_context: }
}
{ \__kernel_chk_if_free_cs:N }
@@ -1000,7 +1001,7 @@
{
\cs_if_free:NF #4
{
- \__kernel_debug_log:x
+ \__kernel_debug_log:e
{
Variant~\token_to_str:N #4~%
already~defined;~ not~ changing~ it~ \msg_line_context:
@@ -1013,7 +1014,7 @@
\__kernel_patch:nnn
{
\cs_if_exist:cF { \c_@@_code_root_str #1 }
- { \__kernel_debug_log:x { Defining~key~#1~\msg_line_context: } }
+ { \__kernel_debug_log:e { Defining~key~#1~\msg_line_context: } }
}
{ }
{ \@@_cmd_set_direct:nn }
@@ -1021,7 +1022,7 @@
\__kernel_patch:nnn
{ }
{
- \__kernel_debug_log:x
+ \__kernel_debug_log:e
{ Defining~message~ #1 / #2 ~\msg_line_context: }
}
{ \@@_chk_free:nn }
@@ -1059,7 +1060,7 @@
{
\@@_trace_push:nnN { regex } { 1 } \@@_escape_use:nnnn
\group_begin:
- \__kernel_tl_set:Nx \l_@@_internal_a_tl
+ \__kernel_tl_set:Ne \l_@@_internal_a_tl
{ \@@_trace_pop:nnN { regex } { 1 } \@@_escape_use:nnnn }
\use_none:nnn
}
@@ -1081,7 +1082,7 @@
{ \@@_build_for_cs:n }
\__kernel_patch:nnn
{
- \@@_trace:nnx { regex } { 2 }
+ \@@_trace:nne { regex } { 2 }
{
regex~new~state~
L=\int_use:N \l_@@_left_state_int ~ -> ~
@@ -1103,24 +1104,24 @@
\__kernel_patch:nnn
{
\@@_trace_push:nnN { regex } { 1 } \@@_match:n
- \@@_trace:nnx { regex } { 1 } { analyzing~query~token~list }
+ \@@_trace:nne { regex } { 1 } { analyzing~query~token~list }
}
{ \@@_trace_pop:nnN { regex } { 1 } \@@_match:n }
{ \@@_match:n }
\__kernel_patch:nnn
{
\@@_trace_push:nnN { regex } { 1 } \@@_match_cs:n
- \@@_trace:nnx { regex } { 1 } { analyzing~query~token~list }
+ \@@_trace:nne { regex } { 1 } { analyzing~query~token~list }
}
{ \@@_trace_pop:nnN { regex } { 1 } \@@_match_cs:n }
{ \@@_match_cs:n }
\__kernel_patch:nnn
- { \@@_trace:nnx { regex } { 1 } { initializing } }
+ { \@@_trace:nne { regex } { 1 } { initializing } }
{ }
{ \@@_match_init: }
\__kernel_patch:nnn
{
- \@@_trace:nnx { regex } { 2 }
+ \@@_trace:nne { regex } { 2 }
{ state~\int_use:N \l_@@_curr_state_int }
}
{ }
@@ -1153,7 +1154,7 @@
{
\char_set_catcode_parameter:N \#
\tex_endlinechar:D -1 \scan_stop:
- \exp_args:Nx \tex_scantokens:D
+ \exp_args:Ne \tex_scantokens:D
{
\tex_global:D \cs_prefix_spec:N #1 \tex_def:D \exp_not:N #1
\cs_parameter_spec:N #1
@@ -1172,7 +1173,7 @@
{
\tl_map_inline:nn {#1}
{
- \exp_args:NNx \__kernel_patch:Nn ##1
+ \exp_args:NNe \__kernel_patch:Nn ##1
{
{ \c_hash_str 1 }
{
@@ -1238,7 +1239,7 @@
{
\tl_map_inline:nn {#1}
{
- \exp_args:NNx \__kernel_patch:Nn ##1
+ \exp_args:NNe \__kernel_patch:Nn ##1
{
{
\exp_not:N \__kernel_chk_expr:nNnN { \c_hash_str 1 }
@@ -1286,7 +1287,7 @@
{
\tl_map_inline:nn {#1}
{
- \exp_args:NNx \__kernel_patch:Nn ##1
+ \exp_args:NNe \__kernel_patch:Nn ##1
{
{
\exp_not:N \__kernel_chk_expr:nNnN { \c_hash_str 1 }
@@ -1325,7 +1326,7 @@
{
\clist_map_inline:nn { :nNnT , :nNnF , :nNnTF , _p:nNn }
{
- \exp_args:Ncx \__kernel_patch:Nn { #1 ##1 }
+ \exp_args:Nce \__kernel_patch:Nn { #1 ##1 }
{
{
\exp_not:N \__kernel_chk_expr:nNnN { \c_hash_str 1 }
@@ -1349,7 +1350,7 @@
{
\clist_map_inline:nn { :nT , :nF , :nTF , _p:n }
{
- \exp_args:Ncx \__kernel_patch:Nn { #1 ##1 }
+ \exp_args:Nce \__kernel_patch:Nn { #1 ##1 }
{
{
\exp_not:N \__kernel_chk_expr:nNnN { \c_hash_str 1 }