1 files changed, 6 insertions, 7 deletions
diff --git a/Master/texmf-dist/tex/latex/unicode-math/unicode-math-xetex.sty b/Master/texmf-dist/tex/latex/unicode-math/unicode-math-xetex.sty
index 863e495ce2c..9c4035b1179 100644
--- a/Master/texmf-dist/tex/latex/unicode-math/unicode-math-xetex.sty
+++ b/Master/texmf-dist/tex/latex/unicode-math/unicode-math-xetex.sty
@@ -2221,9 +2221,9 @@
   }
 }
 \cs_new:Npn \um_scan_sscript:TF #1#2 {
-  \tl_set:Nx \peek_true_aux:w { \exp_not:n{ #1 } }
-  \tl_set_eq:NN \peek_true:w \peek_true_remove:w
-  \tl_set:Nx \peek_false:w { \exp_not:n { \group_align_safe_end: #2 } }
+  \tl_set:Nx \__peek_true_aux:w { \exp_not:n{ #1 } }
+  \tl_set_eq:NN \__peek_true:w \__peek_true_remove:w
+  \tl_set:Nx \__peek_false:w { \exp_not:n { \group_align_safe_end: #2 } }
   \group_align_safe_begin:
     \peek_after:Nw \um_peek_execute_branches_ss:
 }
@@ -2233,7 +2233,7 @@
     \token_if_eq_catcode_p:NN \l_peek_token \c_group_end_token ||
     \token_if_eq_meaning_p:NN \l_peek_token \c_space_token
   }
-  { \peek_false:w  }
+  { \__peek_false:w  }
   { \um_peek_execute_branches_ss_aux: }
 }
 \cs_new:Npn \um_peek_execute_branches_ss_aux: {
@@ -2243,9 +2243,9 @@
       \prop_get:cxN
         {g_um_\l_um_tmpa_tl _prop} {\meaning\l_peek_token} \l_um_tmpb_tl
       \tl_put_right:NV \l_um_ss_chain_tl \l_um_tmpb_tl
-      \peek_true:w
+      \__peek_true:w
     }
-    { \peek_false:w }
+    { \__peek_false:w }
 }
 \cs_new:Npn \um_define_active_frac:Nw #1 #2/#3 {
   \char_set_catcode_active:N #1
@@ -2319,7 +2319,6 @@
 \def\digamma{\updigamma}
 \def\Digamma{\upDigamma}
 \def\operator@font{\um_switchto_mathup:}
-\chk_if_free_cs:N \um_tmpa:w
 \cs_new_protected_nopar:Npn \um_check_and_fix:NNnnnn #1 #2 #3 #4 #5 #6 {
   \cs_if_exist:NT #1 {
     \token_if_macro:NTF #1 {