diff --git a/zutil/zutil-tblr.code.tex b/zutil/zutil-tblr.code.tex index 8a685f0..43cd35d 100644 --- a/zutil/zutil-tblr.code.tex +++ b/zutil/zutil-tblr.code.tex @@ -10,6 +10,18 @@ The~existing~definition~of~'#2'~will~not~be~altered. } +% It can be defined as simple as +% %<@@=seq> +% \cs_new_protected:Npn \zutil_seq_set_split_keep_braces:Nnn +% { \@@_set_split:NNNnn \__kernel_tl_set:Nx +% \__zutil_seq_trim_spaces:n } +% so differs from \seq_set_split:Nnn and \seq_set_split_keep_spaces:Nnn +% by only the space trimming function: +% \cs_new_protected:Npn \seq_set_split:Nnn +% { \@@_set_split:NNNnn \__kernel_tl_set:Nx \tl_trim_spaces:n } +% \cs_new_protected:Npn \seq_set_split_keep_spaces:Nnn +% { \@@_set_split:NNNnn \__kernel_tl_set:Nx \exp_not:n } +% but I insist on raising an error on empty delimiter. \cs_new_protected:Npn \zutil_seq_set_split_keep_braces:Nnn #1 { \__zutil_seq_set_split:NNNNnn @@ -18,6 +30,7 @@ } \cs_generate_variant:Nn \zutil_seq_set_split_keep_braces:Nnn { NnV } +% gset version \cs_new_protected:Npn \zutil_seq_gset_split_keep_braces:Nnn #1 { \__zutil_seq_set_split:NNNNnn @@ -32,7 +45,7 @@ \cs_new:Npn \__zutil_seq_trim_spaces:n #1 { { \tl_trim_spaces:n {#1} } } % Compared to \__seq_set_split:NNNnn, a forth N-arg is added which -% holds the user function, i.e. \zutil_seq_set_split_keep_braces:Nnn, +% holds the caller, i.e. \zutil_seq_set_split_keep_braces:Nnn, % for use in error message. % % l3seq internals \__seq_set_split:Nw and \l__seq_internal_a_tl, along