diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/l3kernel/l3unicode.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/l3kernel/l3unicode.dtx | 36 |
1 files changed, 26 insertions, 10 deletions
diff --git a/Master/texmf-dist/source/latex/l3kernel/l3unicode.dtx b/Master/texmf-dist/source/latex/l3kernel/l3unicode.dtx index 3006d953d6d..0e6dcc47b9e 100644 --- a/Master/texmf-dist/source/latex/l3kernel/l3unicode.dtx +++ b/Master/texmf-dist/source/latex/l3kernel/l3unicode.dtx @@ -41,7 +41,7 @@ % }^^A % } % -% \date{Released 2018-04-30} +% \date{Released 2018-05-12} % % \maketitle % @@ -82,7 +82,7 @@ % \end{macrocode} % Set up a private copy of the char-generation primitive. % \begin{macrocode} - \cs_set_eq:NN \@@_generate:w \utex_char:D + \cs_set_eq:NN \@@_generate:w \tex_Uchar:D % \end{macrocode} % Parse the main Unicode data file for title case exceptions (the one-to-one % lower and upper case mappings it contains are all be covered by the \TeX{} @@ -102,7 +102,10 @@ { \tl_const:cx { c_@@_mixed_case_ \@@_generate:w "#1 _tl } - { \@@_generate:w "#7 } + { + \char_generate:nn { "#7 } + { \char_value_catcode:n { "#7 } } + } } } } @@ -130,7 +133,10 @@ { \tl_const:cx { c_@@_fold_case_ \@@_generate:w "#1 _tl } - { \@@_generate:w "#3 } + { + \char_generate:nn { "#3 } + { \char_value_catcode:n { "#3 } } + } } } { @@ -142,10 +148,15 @@ { \tl_const:cx { c_@@_fold_case_ \@@_generate:w "#1 _tl } { - \@@_generate:w "#2 \exp_stop_f: - \@@_generate:w "#3 \exp_stop_f: + \char_generate:nn { "#2 } + { \char_value_catcode:n { "#2 } } + \char_generate:nn { "#3 } + { \char_value_catcode:n { "#3 } } \tl_if_blank:nF {#4} - { \@@_generate:w "#4 } + { + \char_generate:nn { "#4 } + { \char_value_catcode:n { "#4 } } + } } } \ior_str_map_inline:Nn \g_@@_data_ior @@ -178,10 +189,15 @@ { \tl_const:cx { c_@@_ #2 _case_ \@@_generate:w "#1 _tl } { - \@@_generate:w "#3 \exp_stop_f: - \@@_generate:w "#4 \exp_stop_f: + \char_generate:nn { "#3 } + { \char_value_catcode:n { "#3 } } + \char_generate:nn { "#4 } + { \char_value_catcode:n { "#4 } } \tl_if_blank:nF {#5} - { \@@_generate:w "#5 } + { + \char_generate:nn { "#5 } + { \char_value_catcode:n { "#5 } } + } } } } |