gcc/c-family/c-ada-spec.c

19 along with GCC; see the file COPYING3.  If not see
518    If ORIG_TYPE is true, also consider struct with a DECL_ORIGINAL_TYPE.  */
759 struct with { char *s; const char *in_file; int limited; };
760 static struct with *withs = NULL;
764 /* Record a "with" clause on package S (a limited with if LIMITED_ACCESS is
773     withs = XNEWVEC (struct with, withs_max);
778       withs = XRESIZEVEC (struct with, withs, withs_max);
795 /* Reset "with" clauses.  */
813 /* Dump "with" clauses in F.  */
820   fprintf (f, "with Interfaces.C; use Interfaces.C;\n");
888   "terminate", "then", "type", "until", "use", "when", "while", "with", "xor",
894   /* system will cause troubles with System.Address.  */
897   /* The following values have other definitions with same name/other
1228    'with' clause rather than a regular 'with' clause.  */
1354    'with' clause rather than a regular 'with' clause.  */
1459 /* Dump in BUFFER a function declaration FUNC with Ada syntax.
1584 /* Dump in BUFFER all the domains associated with an array NODE,
1705 /* Dump in BUFFER type names associated with a template, each prepended with
1727 /* Dump in BUFFER the contents of all class instantiations associated with
1834    can be referenced via a "limited with" clause.  NAME_ONLY indicates whether
2198 	 is consistent with the internal treatment and makes it possible
2284 	      pp_string (buffer, first ? "tagged limited " : " with ");
2321    needs to be able to differentiate regular methods (with 'this' pointer)
3158    with Ada syntax.  SPC is the indentation level.  If DISPLAY_CONVENTION is