% \iffalse meta-comment % %% File: l3deprecation.dtx % % Copyright (C) 2017-2022 The LaTeX Project % % It may be distributed and/or modified under the conditions of the % LaTeX Project Public License (LPPL), either version 1.3c of this % license or (at your option) any later version. The latest version % of this license is in the file % % https://www.latex-project.org/lppl.txt % % This file is part of the "l3kernel bundle" (The Work in LPPL) % and all files in that bundle must be distributed together. % % ----------------------------------------------------------------------- % % The development version of the bundle can be found at % % https://github.com/latex3/latex3 % % for those people who are interested. % %<*driver> \documentclass[full,kernel]{l3doc} \begin{document} \DocInput{\jobname.dtx} \end{document} % % \fi % % \title{^^A % The \pkg{l3deprecation} package\\ Deprecation errors^^A % } % % \author{^^A % The \LaTeX{} Project\thanks % {^^A % E-mail: % \href{mailto:latex-team@latex-project.org} % {latex-team@latex-project.org}^^A % }^^A % } % % \date{Released 2022-04-29} % % \maketitle % % \begin{documentation} % % \section{\pkg{l3deprecation} documentation} % % A few commands have had to be deprecated over the years. This module % defines deprecated and deleted commands to produce an error. % % \end{documentation} % % \begin{implementation} % % \section{\pkg{l3deprecation} implementation} % % \begin{macrocode} %<*package> % \end{macrocode} % % \begin{macrocode} %<@@=deprecation> % \end{macrocode} % % \subsection{Patching definitions to deprecate} % % \begin{quote} % \cs{__kernel_patch_deprecation:nnNNpn} \Arg{date} \Arg{replacement} % \meta{definition} \meta{function} \meta{parameters} \Arg{code} % \end{quote} % defines the \meta{function} to produce a warning and run its % \meta{code}, or to produce an error and not run any \meta{code}, % depending on the \pkg{expl3} date. % \begin{itemize} % \item If the \pkg{expl3} date is less than the \meta{date} (plus % $6$~months in case \texttt{undo-recent-deprecations} is used) then % we define the \meta{function} to produce a warning and run its code. % The warning is actually suppressed in two cases: % \begin{itemize} % \item if neither \texttt{undo-recent-deprecations} nor % \texttt{enable-debug} are in effect we may be in an end-user's % document so it is suppressed; % \item if the command is expandable then we cannot produce a warning. % \end{itemize} % \item Otherwise, we define the \meta{function} to produce an error. % \end{itemize} % In both cases we additionally make \cs{debug_on:n} |{deprecation}| % turn the \meta{function} into an \tn{outer} error, and % \cs{debug_off:n} |{deprecation}| restore whatever the behaviour was % without \cs{debug_on:n} |{deprecation}|. % % In later sections we use the \pkg{l3doc} key \texttt{deprecated} with % a date equal to that \meta{date} plus $6$~months, so that \pkg{l3doc} % will complain if we forget to remove the stale \meta{parameters} and % \Arg{code}. % % In the explanations below, \meta{definition} \meta{function} % \meta{parameters} \Arg{code} or assignments that only differ in the % scope of the \meta{definition} will be called \enquote{the standard % definition}. % % \begin{macro} % { % \__kernel_patch_deprecation:nnNNpn, \@@_patch_aux:nnNNnn, % \@@_warn_once:nnNnn, % \@@_patch_aux:Nn, % \@@_just_error:nnNN % } % (The parameter text is grabbed using |#5#|.) The arguments of % \cs{__kernel_deprecation_code:nn} are run upon \cs{debug_on:n} % |{deprecation}| and \cs{debug_off:n} |{deprecation}|, respectively. % In both scenarios we the \meta{function} may be \tn{outer} so we % undefine it with \cs{tex_let:D} before redefining it, with % \cs{__kernel_deprecation_error:Nnn} or with some code added shortly. % \begin{macrocode} \cs_new_protected:Npn \__kernel_patch_deprecation:nnNNpn #1#2#3#4#5# { \@@_patch_aux:nnNNnn {#1} {#2} #3 #4 {#5} } \cs_new_protected:Npn \@@_patch_aux:nnNNnn #1#2#3#4#5#6 { \__kernel_deprecation_code:nn { \tex_let:D #4 \scan_stop: \__kernel_deprecation_error:Nnn #4 {#2} {#1} } { \tex_let:D #4 \scan_stop: } \cs_if_eq:NNTF #3 \cs_gset_protected:Npn { \@@_warn_once:nnNnn {#1} {#2} #4 {#5} {#6} } { \@@_patch_aux:Nn #3 { #4 #5 {#6} } } } % \end{macrocode} % In case we want a warning, the \meta{function} is defined to produce % such a warning without grabbing any argument, then redefine itself % to the standard definition that the \meta{function} should have, % with arguments, and call that definition. The \texttt{x}-type % expansion and \cs{exp_not:n} avoid needing to double the~|#|, which % we could not do anyways. We then deal with the code for % \cs{debug_off:n} |{deprecation}|: presumably someone doing that does % not need the warning so we simply do the standard definition. % \begin{macrocode} \cs_new_protected:Npn \@@_warn_once:nnNnn #1#2#3#4#5 { \cs_gset_protected:Npx #3 { \__kernel_if_debug:TF { \exp_not:N \msg_warning:nnxxx { deprecation } { deprecated-command } {#1} { \token_to_str:N #3 } { \tl_to_str:n {#2} } } { } \exp_not:n { \cs_gset_protected:Npn #3 #4 {#5} } \exp_not:N #3 } \__kernel_deprecation_code:nn { } { \cs_set_protected:Npn #3 #4 {#5} } } % \end{macrocode} % In case we want neither warning nor error, the \meta{function} is % given its standard definition. Here |#1| is \cs{cs_new:Npn} or % \cs{cs_new_protected:Npn}) and |#2| is \meta{function} % \meta{parameters} \Arg{code}, so |#1#2| performs the assignment. % For \cs{debug_off:n} |{deprecation}| we want to use the same % assignment but with a different scope, hence the \cs{cs_if_eq:NNTF} % test. % \begin{macrocode} \cs_new_protected:Npn \@@_patch_aux:Nn #1#2 { #1 #2 \cs_if_eq:NNTF #1 \cs_gset_protected:Npn { \__kernel_deprecation_code:nn { } { \cs_set_protected:Npn #2 } } { \__kernel_deprecation_code:nn { } { \cs_set:Npn #2 } } } % \end{macrocode} % \end{macro} % % \begin{macro}{\__kernel_deprecation_error:Nnn} % The \tn{outer} definition here ensures the command cannot appear % in an argument. Use this auxiliary on all commands that have been % removed since 2015. % \begin{macrocode} \cs_new_protected:Npn \__kernel_deprecation_error:Nnn #1#2#3 { \tex_protected:D \tex_outer:D \tex_edef:D #1 { \exp_not:N \msg_expandable_error:nnnnn { deprecation } { deprecated-command } { \tl_to_str:n {#3} } { \token_to_str:N #1 } { \tl_to_str:n {#2} } \exp_not:N \msg_error:nnxxx { deprecation } { deprecated-command } { \tl_to_str:n {#3} } { \token_to_str:N #1 } { \tl_to_str:n {#2} } } } % \end{macrocode} % \end{macro} % % \begin{macrocode} \msg_new:nnn { deprecation } { deprecated-command } { \tl_if_blank:nF {#3} { Use~ \tl_trim_spaces:n {#3} ~not~ } #2~deprecated~on~#1. } % \end{macrocode} % % \subsection{Removed functions} % % \begin{macro}{\@@_old_protected:Nnn, \@@_old:Nnn} % Short-hands for old commands whose definition does not matter % any more as they were removed. % \begin{macrocode} \cs_new_protected:Npn \@@_old_protected:Nnn #1#2#3 { \__kernel_patch_deprecation:nnNNpn {#3} {#2} \cs_gset_protected:Npn #1 { } } \cs_new_protected:Npn \@@_old:Nnn #1#2#3 { \__kernel_patch_deprecation:nnNNpn {#3} {#2} \cs_gset:Npn #1 { } } \@@_old_protected:Nnn \box_gset_eq_clear:NN { \box_gset_eq_drop:NN } { 2021-07-01 } \@@_old_protected:Nnn \box_set_eq_clear:NN { \box_set_eq_drop:NN } { 2021-07-01 } \@@_old_protected:Nnn \box_resize:Nnn { \box_resize_to_wd_and_ht_plus_dp:Nnn } { 2019-01-01 } \@@_old_protected:Nnn \box_use_clear:N { \box_use_drop:N } { 2019-01-01 } \@@_old:Nnn \c_job_name_tl { \c_sys_jobname_str } { 2017-01-01 } \@@_old:Nnn \c_minus_one { -1 } { 2019-01-01 } \@@_old:Nnn \c_zero { 0 } { 2020-01-01 } \@@_old:Nnn \c_one { 1 } { 2020-01-01 } \@@_old:Nnn \c_two { 2 } { 2020-01-01 } \@@_old:Nnn \c_three { 3 } { 2020-01-01 } \@@_old:Nnn \c_four { 4 } { 2020-01-01 } \@@_old:Nnn \c_five { 5 } { 2020-01-01 } \@@_old:Nnn \c_six { 6 } { 2020-01-01 } \@@_old:Nnn \c_seven { 7 } { 2020-01-01 } \@@_old:Nnn \c_eight { 8 } { 2020-01-01 } \@@_old:Nnn \c_nine { 9 } { 2020-01-01 } \@@_old:Nnn \c_ten { 10 } { 2020-01-01 } \@@_old:Nnn \c_eleven { 11 } { 2020-01-01 } \@@_old:Nnn \c_twelve { 12 } { 2020-01-01 } \@@_old:Nnn \c_thirteen { 13 } { 2020-01-01 } \@@_old:Nnn \c_fourteen { 14 } { 2020-01-01 } \@@_old:Nnn \c_fifteen { 15 } { 2020-01-01 } \@@_old:Nnn \c_sixteen { 16 } { 2020-01-01 } \@@_old:Nnn \c_thirty_two { 32 } { 2020-01-01 } \@@_old:Nnn \c_one_hundred { 100 } { 2020-01-01 } \@@_old:Nnn \c_two_hundred_fifty_five { 255 } { 2020-01-01 } \@@_old:Nnn \c_two_hundred_fifty_six { 256 } { 2020-01-01 } \@@_old:Nnn \c_one_thousand { 1000 } { 2020-01-01 } \@@_old:Nnn \c_ten_thousand { 10000 } { 2020-01-01 } \@@_old:Nnn \c_term_ior { -1 } { 2021-07-01 } \@@_old:Nnn \dim_case:nnn { \dim_case:nnF } { 2015-07-14 } \@@_old_protected:Nnn \file_add_path:nN { \file_get_full_name:nN } { 2019-01-01 } \@@_old_protected:Nnn \file_if_exist_input:nT { \file_if_exist:nT and~ \file_input:n } { 2018-03-05 } \@@_old_protected:Nnn \file_if_exist_input:nTF { \file_if_exist:nT and~ \file_input:n } { 2018-03-05 } \@@_old_protected:Nnn \file_list: { \file_log_list: } { 2019-01-01 } \@@_old:Nnn \file_path_include:n { \seq_put_right:Nn \l_file_search_path_seq } { 2019-01-01 } \@@_old_protected:Nnn \file_path_remove:n { \seq_remove_all:Nn \l_file_search_path_seq } { 2019-01-01 } \@@_old:Nnn \g_file_current_name_tl { \g_file_curr_name_str } { 2019-01-01 } \@@_old_protected:Nnn \hbox_unpack_clear:N { \hbox_unpack_drop:N } { 2021-07-01 } \@@_old:Nnn \int_case:nnn { \int_case:nnF } { 2015-07-14 } \@@_old:Nnn \int_from_binary:n { \int_from_bin:n } { 2016-01-05 } \@@_old:Nnn \int_from_hexadecimal:n { \int_from_hex:n } { 2016-01-05 } \@@_old:Nnn \int_from_octal:n { \int_from_oct:n } { 2016-01-05 } \@@_old:Nnn \int_to_binary:n { \int_to_bin:n } { 2016-01-05 } \@@_old:Nnn \int_to_hexadecimal:n { \int_to_hex:n } { 2016-01-05 } \@@_old:Nnn \int_to_octal:n { \int_to_oct:n } { 2016-01-05 } \@@_old_protected:Nnn \ior_get_str:NN { \ior_str_get:NN } { 2018-03-05 } \@@_old_protected:Nnn \ior_list_streams: { \ior_show_list: } { 2019-01-01 } \@@_old_protected:Nnn \ior_log_streams: { \ior_log_list: } { 2019-01-01 } \@@_old_protected:Nnn \iow_list_streams: { \iow_show_list: } { 2019-01-01 } \@@_old_protected:Nnn \iow_log_streams: { \iow_log_list: } { 2019-01-01 } \@@_old:Nnn \lua_escape_x:n { \lua_escape:e } { 2020-01-01 } \@@_old:Nnn \lua_now_x:n { \lua_now:e } { 2020-01-01 } \@@_old_protected:Nnn \lua_shipout_x:n { \lua_shipout_e:n } { 2020-01-01 } \@@_old:Nnn \luatex_if_engine_p: { \sys_if_engine_luatex_p: } { 2017-01-01 } \@@_old:Nnn \luatex_if_engine:F { \sys_if_engine_luatex:F } { 2017-01-01 } \@@_old:Nnn \luatex_if_engine:T { \sys_if_engine_luatex:T } { 2017-01-01 } \@@_old:Nnn \luatex_if_engine:TF { \sys_if_engine_luatex:TF } { 2017-01-01 } \@@_old_protected:Nnn \msg_interrupt:nnn { [Defined~error~message] } { 2020-01-01 } \@@_old_protected:Nnn \msg_log:n { \iow_log:n } { 2020-01-01 } \@@_old_protected:Nnn \msg_term:n { \iow_term:n } { 2020-01-01 } \@@_old:Nnn \pdftex_if_engine_p: { \sys_if_engine_pdftex_p: } { 2017-01-01 } \@@_old:Nnn \pdftex_if_engine:F { \sys_if_engine_pdftex:F } { 2017-01-01 } \@@_old:Nnn \pdftex_if_engine:T { \sys_if_engine_pdftex:T } { 2017-01-01 } \@@_old:Nnn \pdftex_if_engine:TF { \sys_if_engine_pdftex:TF } { 2017-01-01 } \@@_old:Nnn \prop_get:cn { \prop_item:cn } { 2016-01-05 } \@@_old:Nnn \prop_get:Nn { \prop_item:Nn } { 2016-01-05 } \@@_old:Nnn \quark_if_recursion_tail_break:N { } { 2015-07-14 } \@@_old:Nnn \quark_if_recursion_tail_break:n { } { 2015-07-14 } \@@_old:Nnn \scan_align_safe_stop: { protected~commands } { 2017-01-01 } \@@_old:Nnn \sort_ordered: { \sort_return_same: } { 2019-01-01 } \@@_old:Nnn \sort_reversed: { \sort_return_swapped: } { 2019-01-01 } \@@_old:Nnn \str_case:nnn { \str_case:nnF } { 2015-07-14 } \@@_old:Nnn \str_case:onn { \str_case:onF } { 2015-07-14 } \@@_old:Nnn \str_case_x:nn { \str_case_e:nn } { 2020-01-01 } \@@_old:Nnn \str_case_x:nnn { \str_case_e:nnF } { 2015-07-14 } \@@_old:Nnn \str_case_x:nnT { \str_case_e:nnT } { 2020-01-01 } \@@_old:Nnn \str_case_x:nnTF { \str_case_e:nnTF } { 2020-01-01 } \@@_old:Nnn \str_case_x:nnF { \str_case_e:nnF } { 2020-01-01 } \@@_old:Nnn \str_if_eq_x_p:nn { \str_if_eq_p:ee } { 2020-01-01 } \@@_old:Nnn \str_if_eq_x:nnT { \str_if_eq:eeT } { 2020-01-01 } \@@_old:Nnn \str_if_eq_x:nnF { \str_if_eq:eeF } { 2020-01-01 } \@@_old:Nnn \str_if_eq_x:nnTF { \str_if_eq:eeTF } { 2020-01-01 } \@@_old_protected:Nnn \tl_show_analysis:N { \tl_analysis_show:N } { 2020-01-01 } \@@_old_protected:Nnn \tl_show_analysis:n { \tl_analysis_show:n } { 2020-01-01 } \@@_old:Nnn \tl_case:cnn { \tl_case:cnF } { 2015-07-14 } \@@_old:Nnn \tl_case:Nnn { \tl_case:NnF } { 2015-07-14 } \@@_old_protected:Nnn \tl_gset_from_file:Nnn { \file_get:nnN } { 2021-07-01 } \@@_old_protected:Nnn \tl_gset_from_file_x:Nnn { \file_get:nnN } { 2021-07-01 } \@@_old_protected:Nnn \tl_set_from_file:Nnn { \file_get:nnN } { 2021-07-01 } \@@_old_protected:Nnn \tl_set_from_file_x:Nnn { \file_get:nnN } { 2021-07-01 } \@@_old_protected:Nnn \tl_to_lowercase:n { \tex_lowercase:D } { 2018-03-05 } \@@_old_protected:Nnn \tl_to_uppercase:n { \tex_uppercase:D } { 2018-03-05 } \@@_old:Nnn \token_get_arg_spec:N { \cs_argument_spec:N } { 2021-07-01 } \@@_old:Nnn \token_get_prefix_spec:N { \cs_prefix_spec:N } { 2021-07-01 } \@@_old:Nnn \token_get_replacement_spec:N { \cs_replacement_spec:N } { 2021-07-01 } \@@_old_protected:Nnn \token_new:Nn { \cs_new_eq:NN } { 2019-01-01 } \@@_old_protected:Nnn \vbox_unpack_clear:N { \vbox_unpack_drop:N } { 2021-07-01 } \@@_old:Nnn \xetex_if_engine_p: { \sys_if_engine_xetex_p: } { 2017-01-01 } \@@_old:Nnn \xetex_if_engine:F { \sys_if_engine_xetex:F } { 2017-01-01 } \@@_old:Nnn \xetex_if_engine:T { \sys_if_engine_xetex:T } { 2017-01-01 } \@@_old:Nnn \xetex_if_engine:TF { \sys_if_engine_xetex:TF } { 2017-01-01 } % \end{macrocode} % \end{macro} % % \subsection{Deprecated \pkg{l3str} functions} % % \begin{macrocode} %<@@=str> % \end{macrocode} % % \begin{macro}[EXP] % { % \str_lower_case:n, \str_lower_case:f, % \str_upper_case:n, \str_upper_case:f, % \str_fold_case:n, \str_fold_case:V % } % \begin{macrocode} \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \str_lowercase:n } \cs_gset:Npn \str_lower_case:n { \str_lowercase:n } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \str_lowercase:f } \cs_gset:Npn \str_lower_case:f { \str_lowercase:f } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \str_uppercase:n } \cs_gset:Npn \str_upper_case:n { \str_uppercase:n } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \str_uppercase:f } \cs_gset:Npn \str_upper_case:f { \str_uppercase:f } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \str_foldcase:n } \cs_gset:Npn \str_fold_case:n { \str_foldcase:n } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \str_foldcase:V } \cs_gset:Npn \str_fold_case:V { \str_foldcase:V } % \end{macrocode} % \end{macro} % % \begin{macro}[EXP] % {\str_declare_eight_bit_encoding:nnn} % This command was made internal, with one more argument. There is no % easy way to compute a reasonable value for that extra argument so we % take a value that is big enough to accommodate all of Unicode. % \begin{macrocode} \__kernel_patch_deprecation:nnNNpn { 2020-08-20 } { } \cs_gset_protected:Npn \str_declare_eight_bit_encoding:nnn #1 { \@@_declare_eight_bit_encoding:nnnn {#1} { 1114112 } } % \end{macrocode} % \end{macro} % % \subsection{Deprecated \pkg{l3seq} functions} % % \begin{macro}{\seq_indexed_map_inline:Nn} % \begin{macro}[EXP]{ \seq_indexed_map_function:NN} % \begin{macrocode} \__kernel_patch_deprecation:nnNNpn { 2020-06-18 } { \seq_map_indexed_inline:Nn } \cs_gset_protected:Npn \seq_indexed_map_inline:Nn { \seq_map_indexed_inline:Nn } \__kernel_patch_deprecation:nnNNpn { 2020-06-18 } { \seq_map_indexed_function:NN } \cs_gset:Npn \seq_indexed_map_function:NN { \seq_map_indexed_function:NN } % \end{macrocode} % \end{macro} % \end{macro} % % \subsection{Deprecated \pkg{l3sys} functions} % % \begin{macrocode} %<@@=sys> % \end{macrocode} % % \begin{macro}{\sys_load_deprecation:} % \begin{macrocode} \__kernel_patch_deprecation:nnNNpn { 2021-01-11 } { (no~longer~required) } \cs_gset_protected:Npn \sys_load_deprecation: { } % \end{macrocode} % \end{macro} % % \subsection{Deprecated \pkg{l3tl} functions} % % \begin{macrocode} %<@@=tl> % \end{macrocode} % % \begin{macro} % { % \tl_lower_case:n, \tl_lower_case:nn, % \tl_upper_case:n, \tl_upper_case:nn, % \tl_mixed_case:n, \tl_mixed_case:nn, % } % \begin{macrocode} \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \text_lowercase:n } \cs_gset:Npn \tl_lower_case:n #1 { \text_lowercase:n {#1} } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \text_lowercase:nn } \cs_gset:Npn \tl_lower_case:nn #1#2 { \text_lowercase:nn {#1} {#2} } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \text_uppercase:n } \cs_gset:Npn \tl_upper_case:n #1 { \text_uppercase:n {#1} } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \text_uppercase:nn } \cs_gset:Npn \tl_upper_case:nn #1#2 { \text_uppercase:nn {#1} {#2} } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \text_titlecase:n } \cs_gset:Npn \tl_mixed_case:n #1 { \text_titlecase:n {#1} } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \text_titlecase:nn } \cs_gset:Npn \tl_mixed_case:nn #1#2 { \text_titlecase:nn {#1} {#2} } % \end{macrocode} % \end{macro} % % \subsection{Deprecated \pkg{l3token} functions} % % \begin{macro}[EXP] % { % \char_lower_case:N, \char_upper_case:N, % \char_mixed_case:Nn, \char_fold_case:N, % \char_str_lower_case:N, \char_str_upper_case:N, % \char_str_mixed_case:Nn, \char_str_fold_case:N, % } % \begin{macrocode} \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_lowercase:N } \cs_gset:Npn \char_lower_case:N { \char_lowercase:N } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_uppercase:N } \cs_gset:Npn \char_upper_case:N { \char_uppercase:N } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_titlecase:N } \cs_gset:Npn \char_mixed_case:N { \char_titlecase:N } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_foldcase:N } \cs_gset:Npn \char_fold_case:N { \char_foldcase:N } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_str_lowercase:N } \cs_gset:Npn \char_str_lower_case:N { \char_str_lowercase:N } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_str_uppercase:N } \cs_gset:Npn \char_str_upper_case:N { \char_str_uppercase:N } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_str_titlecase:N } \cs_gset:Npn \char_str_mixed_case:N { \char_str_titlecase:N } \__kernel_patch_deprecation:nnNNpn { 2020-01-03 } { \char_str_foldcase:N } \cs_gset:Npn \char_str_fold_case:N { \char_str_foldcase:N } % \end{macrocode} % \end{macro} % % \begin{macro}[TF] % { % \peek_catcode_ignore_spaces:N, \peek_catcode_remove_ignore_spaces:N, % \peek_charcode_ignore_spaces:N, \peek_charcode_remove_ignore_spaces:N, % \peek_meaning_ignore_spaces:N, \peek_meaning_remove_ignore_spaces:N % } % A little extra fun here to deal with the expansion. % \begin{macrocode} \tl_map_inline:nn { { catcode } { catcode_remove } { charcode } { charcode_remove } { meaning } { meaning_remove } } { \use:x { \__kernel_patch_deprecation:nnNNpn { 2022-01-11 } { \peek_remove_spaces:n } \cs_gset_protected:Npn \exp_not:c { peek_ #1 _ignore_spaces:NTF } ####1####2####3 { \peek_remove_spaces:n { \exp_not:c { peek_ #1 :NTF } ####1 {####2} {####3} } } \__kernel_patch_deprecation:nnNNpn { 2022-01-11 } { \peek_remove_spaces:n } \cs_gset_protected:Npn \exp_not:c { peek_ #1 _ignore_spaces:NT } ####1####2 { \peek_remove_spaces:n { \exp_not:c { peek_ #1 :NT } ####1 {####2} } } \__kernel_patch_deprecation:nnNNpn { 2022-01-11 } { \peek_remove_spaces:n } \cs_gset_protected:Npn \exp_not:c { peek_ #1 _ignore_spaces:NF } ####1####2 { \peek_remove_spaces:n { \exp_not:c { peek_ #1 :NF } ####1 {####2} } } } } % \end{macrocode} % \end{macro} % % \begin{macrocode} % % \end{macrocode} % % \end{implementation} % % \PrintIndex