FreeBSD/contrib/gcc/cp/decl.c
/* Declare a local label named ID.  */
Declare a local label named ID.
Declare a local label named ID .
tree
declare_local_label (tree id)
{
  tree decl, shadow;
  shadow = tree_cons (IDENTIFIER_LABEL_VALUE (id), NULL_TREE,
		      current_binding_level->shadowed_labels);
  current_binding_level->shadowed_labels = shadow;
  decl = make_label_decl (id, 1);
  TREE_VALUE (shadow) = decl;
  return decl;
}
tree declare_local_label ( tree id ) { tree decl , shadow ; shadow = tree_cons ( IDENTIFIER_LABEL_VALUE ( id ) , NULL_TREE , current_binding_level -> shadowed_labels ) ; current_binding_level -> shadowed_labels = shadow ; decl = make_label_decl ( id , 1 ) ; TREE_VALUE ( shadow ) = decl ; return decl ; }
Declare a local label named ID.
Declare a local label named ID .
/* Add a new entry to the SHADOWED_LABELS list so that when we leave
     this scope we can restore the old value of IDENTIFIER_TYPE_VALUE.  */ /*local_p=*/