- %\typeout {um: \string#1, \int_from_hexadecimal:n {#2}} <- for debug
- \char_set_lccode:nn { `! } { "#2 }
+ \cs_set:Npn \__um_sym:nnn ##1##2##3
+ {
+ \tl_if_in:nnT
+ { \mathord \mathalpha \mathbin \mathrel \mathpunct \mathop \mathfence }
+ {##3}
+ {
+ \exp_last_unbraced:NNx \cs_gset_eq:NN ##2 { \Ucharcat ##1 ~ 12 ~ }
+ \ltjsetmathletter{ ##1 }
+ }
+ }
+ \__um_input_math_symbol_table:
+ \group_end:
+ }
+}{
+ \cs_if_exist:cTF { __um_cs_set_eq_active_char:Nw } {
+ \tl_set:Nn \l_tmpa_tl { __um_cs_set_eq_active_char:Nw }
+ \bool_set_true:N \lltjp_um_patch_mathgroup_bool
+ }{
+ \tl_set:Nn \l_tmpa_tl { um_cs_set_eq_active_char:Nw }
+ }
+ \cs_gset:cpn { \tl_use:N \l_tmpa_tl } #1 = "#2 \q_nil {%"
+ \group_begin:
+ %\typeout {um: \string#1, \int_from_hex:n {#2}, #2}% <- for debug
+ \char_set_lccode:nn { `! } { "#2 }%"