model_server/xref/src/xrefSymbol.h.cxx
//boris: 121196  old way low level get_link_local () without scopes/units
121196  old way low level get_link_local () without scopes/units
121196 old way low level get_link_local () without scopes / units
int xrefSymbol::get_local_link_internal (linkType lt, symbolArr &as, XrefTable *Xr)
{
    Initialize(xrefSymbol::get_local_link_internal);
    int retval = 0;
    uint s_ind = get_symbol_index();
    register Link* lnk = get_start_link(s_ind, Xr);
    while (lnk && !last_link(lnk)) {
      if (lnk->lt() == lt) {
	as.insert_last(lnk->get_symbol_of_link(Xr));
	retval++;
	if (lt == is_defined_in)
	  break;
      }
      lnk = get_next_link(lnk, s_ind, Xr);
    }
    return retval;
}
int xrefSymbol :: get_local_link_internal ( linkType lt , symbolArr & as , XrefTable * Xr ) { Initialize ( xrefSymbol :: get_local_link_internal ) ; int retval = 0 ; uint s_ind = get_symbol_index ( ) ; register Link * lnk = get_start_link ( s_ind , Xr ) ; while ( lnk && ! last_link ( lnk ) ) { if ( lnk -> lt ( ) == lt ) { as . insert_last ( lnk -> get_symbol_of_link ( Xr ) ) ; retval ++ ; if ( lt == is_defined_in ) break ; } lnk = get_next_link ( lnk , s_ind , Xr ) ; } return retval ; }
boris: 121196  old way low level get_link_local () without scopes/units
boris : 121196 old way low level get_link_local () without scopes / units