DIF_SUBR_TOUPPER
{ "toupper", DT_IDENT_FUNC, 0, DIF_SUBR_TOUPPER, DT_ATTR_STABCMN, DT_VERS_1_8,
case DIF_SUBR_TOUPPER:
if (subr == DIF_SUBR_TOUPPER) {