uptex-m.ch: support \kchar in math

[aminophen]

kchar_num の考慮漏れにより，最後の行でエラーが出ることに気づきました。

%#!uptex
\chardef\X="3042    $\left[a_\X\right]$
\def\W{\char"3042}  $\left[a_\W\right]$
\kchardef\X="3042   $\left[a_\X\right]$
\def\W{\kchar"3042} $\left[a_\W\right]$ % => ! Missing { inserted. !?
\bye

uptex-math-kchar ブランチで直しています。

[aminophen]

r68155 で入れました。