m3-sys/m3cc/gcc-apple/gcc/c-decl.c
/* Make a label named NAME in the current function, shadowing silently
   any that may be inherited from containing functions or containing
   scopes.  This is called for __label__ declarations.  */
Make a label named NAME in the current function, shadowing silently
any that may be inherited from containing functions or containing
scopes.  This is called for __label__ declarations.
Make a label named NAME in the current function shadowing silently any that may be inherited from containing functions or containing scopes . This is called for __label__ declarations .
tree
declare_label (tree name)
{
  struct c_binding *b = I_LABEL_BINDING (name);
  tree label;
  if (b && B_IN_CURRENT_SCOPE (b))
    {
      error ("duplicate label declaration %qE", name);
      locate_old_decl (b->decl, error);
      return b->decl;
    }
  label = make_label (name, input_location);
  C_DECLARED_LABEL_FLAG (label) = 1;
  bind (name, label, current_scope,
	false, false);
  return label;
}
tree declare_label ( tree name ) { struct c_binding * b = I_LABEL_BINDING ( name ) ; tree label ; if ( b && B_IN_CURRENT_SCOPE ( b ) ) { error ( " " , name ) ; locate_old_decl ( b -> decl , error ) ; return b -> decl ; } label = make_label ( name , input_location ) ; C_DECLARED_LABEL_FLAG ( label ) = 1 ; bind ( name , label , current_scope , false , false ) ; return label ; }
Make a label named NAME in the current function, shadowing silently
any that may be inherited from containing functions or containing
scopes.
Make a label named NAME in the current function shadowing silently any that may be inherited from containing functions or containing scopes .
/* Check to make sure that the label hasn't already been declared
     at this scope */ /* Just use the previous declaration.  */ /* Declared labels go in the current scope.  */ /*invisible=*/ /*nested=*/