diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-esc-name.def')
-rw-r--r-- | Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-esc-name.def | 95 |
1 files changed, 0 insertions, 95 deletions
diff --git a/Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-esc-name.def b/Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-esc-name.def deleted file mode 100644 index 58ddb088092..00000000000 --- a/Master/texmf-dist/tex/latex/l3experimental/l3str/l3str-esc-name.def +++ /dev/null @@ -1,95 +0,0 @@ -%% -%% This is file `l3str-esc-name.def', -%% generated with the docstrip utility. -%% -%% The original source files were: -%% -%% l3str-convert.dtx (with options: `name') -%% -%% Copyright (C) 2011-2019 The LaTeX3 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: -%% -%% http://www.latex-project.org/lppl.txt -%% -%% This file is part of the "l3experimental bundle" (The Work in LPPL) -%% and all files in that bundle must be distributed together. -%% -%% File: l3str-convert.dtx -\cs_set_protected:Npn \__str_tmp:w #1#2#3 - { - \cs_new_protected:cpn { __str_convert_unescape_#2: } - { - \group_begin: - \flag_clear:n { str_byte } - \flag_clear:n { str_error } - \int_set:Nn \tex_escapechar:D { 92 } - \tl_gset:Nx \g__str_result_tl - { - \exp_after:wN #3 \g__str_result_tl - #1 ? { ? \prg_break: } - \prg_break_point: - } - \__str_if_flag_error:nnx { str_byte } { non-byte } { #2 } - \__str_if_flag_error:nnx { str_error } { unescape-#2 } { } - \group_end: - } - \cs_new:Npn #3 ##1#1##2##3 - { - \__str_filter_bytes:n {##1} - \use_none:n ##3 - \__str_output_byte:w " - \__str_hexadecimal_use:NTF ##2 - { - \__str_hexadecimal_use:NTF ##3 - { } - { - \flag_raise:n { str_error } - * 0 + `#1 \use_i:nn - } - } - { - \flag_raise:n { str_error } - 0 + `#1 \use_i:nn - } - \__str_output_end: - \use_i:nnn #3 ##2##3 - } - \__kernel_msg_new:nnnn { str } { unescape-#2 } - { String~invalid~in~escaping~'#2'. } - { - LaTeX~came~across~the~escape~character~'#1'~not~followed~by~ - two~hexadecimal~digits.~This~is~invalid~in~the~escaping~'#2'. - } - } -\exp_after:wN \__str_tmp:w \c_hash_str { name } - \__str_unescape_name_loop:wNN -\str_const:Nn \c__str_escape_name_not_str { ! " $ & ' } %$ -\str_const:Nn \c__str_escape_name_str { {}/<>[] } -\cs_new_protected:Npn \__str_convert_escape_name: - { \__str_convert_gmap:N \__str_escape_name_char:N } -\cs_new:Npn \__str_escape_name_char:N #1 - { - \__str_if_escape_name:NTF #1 {#1} - { \c_hash_str \__str_output_hexadecimal:n {`#1} } - } -\prg_new_conditional:Npnn \__str_if_escape_name:N #1 { TF } - { - \if_int_compare:w `#1 < "2A \exp_stop_f: - \__str_if_contains_char:NNTF \c__str_escape_name_not_str #1 - \prg_return_true: \prg_return_false: - \else: - \if_int_compare:w `#1 > "7E \exp_stop_f: - \prg_return_false: - \else: - \__str_if_contains_char:NNTF \c__str_escape_name_str #1 - \prg_return_false: \prg_return_true: - \fi: - \fi: - } -%% -%% -%% End of file `l3str-esc-name.def'. |