FreeBSD/contrib/gcc/cp/mangle.c
/* Return the discriminator for ENTITY appearing inside
   FUNCTION.  The discriminator is the lexical ordinal of VAR among
   entities with the same name in the same FUNCTION.  */
Return the discriminator for ENTITY appearing inside
FUNCTION.  The discriminator is the lexical ordinal of VAR among
entities with the same name in the same FUNCTION.
Return the discriminator for ENTITY appearing inside FUNCTION . The discriminator is the lexical ordinal of VAR among entities with the same name in the same FUNCTION .
static int
discriminator_for_local_entity (tree entity)
{
  int discriminator = 0;
  if (DECL_DISCRIMINATOR_P (entity) && DECL_LANG_SPECIFIC (entity))
    discriminator = DECL_DISCRIMINATOR (entity);
  else if (TREE_CODE (entity) == TYPE_DECL)
    {
      int ix;
      entity = TREE_TYPE (entity);
      for (ix = 0; ; ix++)
	{
	  tree type = VEC_index (tree, local_classes, ix);
	  if (type == entity)
	    break;
	  if (TYPE_IDENTIFIER (type) == TYPE_IDENTIFIER (entity)
	      && TYPE_CONTEXT (type) == TYPE_CONTEXT (entity))
	    ++discriminator;
	}
    }
  return discriminator;
}
static int discriminator_for_local_entity ( tree entity ) { int discriminator = 0 ; if ( DECL_DISCRIMINATOR_P ( entity ) && DECL_LANG_SPECIFIC ( entity ) ) discriminator = DECL_DISCRIMINATOR ( entity ) ; else if ( TREE_CODE ( entity ) == TYPE_DECL ) { int ix ; entity = TREE_TYPE ( entity ) ; for ( ix = 0 ; ; ix ++ ) { tree type = VEC_index ( tree , local_classes , ix ) ; if ( type == entity ) break ; if ( TYPE_IDENTIFIER ( type ) == TYPE_IDENTIFIER ( entity ) && TYPE_CONTEXT ( type ) == TYPE_CONTEXT ( entity ) ) ++ discriminator ; } } return discriminator ; }
Return the discriminator for ENTITY appearing inside
FUNCTION.
Return the discriminator for ENTITY appearing inside FUNCTION .
/* Assume this is the only local entity with this name.  */ /* Scan the list of local classes.  */