S_SET_STORAGE_CLASS (symbolP, (!SF_GET_LOCAL (symbolP) ? C_LEAFEXT : C_LEAFSTAT));
if (S_GET_STORAGE_CLASS (symbolP) == C_EXT) S_SET_STORAGE_CLASS (symbolP, C_LEAFEXT); else S_SET_STORAGE_CLASS (symbolP, C_LEAFSTAT);
tc_coff_symbol_emit_hook (symbolP)     symbolS *symbolP;{  if (TC_S_IS_CALLNAME (symbolP))    {#ifdef OBJ_COFF      symbolS *balP = tc_get_bal_of_call (symbolP);#if 0      /* second aux entry contains the bal entry point */      S_SET_NUMBER_AUXILIARY (symbolP, 2);#endif      symbolP->sy_symbol.ost_auxent[1].x_bal.x_balntry = S_GET_VALUE (balP);      S_SET_STORAGE_CLASS (symbolP, (!SF_GET_LOCAL (symbolP) ? C_LEAFEXT : C_LEAFSTAT));      S_SET_DATA_TYPE (symbolP, S_GET_DATA_TYPE (symbolP) | (DT_FCN << N_BTSHFT));      /* fix up the bal symbol */      S_SET_STORAGE_CLASS (balP, C_LABEL);#endif /* OBJ_COFF */    }				/* only on calls */}