Oops, char-upcase is xemacs 21.5 only.