| /src/external/gpl3/gcc/dist/gcc/fortran/ |
| symbol.cc | 41 minit ("LABEL", FL_LABEL), minit ("PROCEDURE", FL_PROCEDURE),
90 /* Set the mstrings for DTIO procedure names. */
361 "dummy argument to the BIND(C) procedure %qs at %L",
457 *is_bind_c = "BIND(C)", *procedure = "PROCEDURE", local
458 *proc_pointer = "PROCEDURE POINTER", *abstract = "ABSTRACT",
537 /* Conflicts between SAVE and PROCEDURE will be checked at
545 /* The copying of procedure dummy arguments for module procedures in
552 gfc_error_now ("internal procedure %qs at %L conflicts with "
581 if ((attr->if_source == IFSRC_DECL && !attr->procedure) || attr->contained
[all...] |
| frontend-passes.cc | 2310 procedure. */
2314 gfc_symbol *procedure; member in struct:contained_info
2353 "INTENT(OUT) argument at %L in procedure %qs "
2355 &a->expr->where, info->procedure->name,
2362 "INTENT(INOUT) argument at %L in procedure %qs "
2364 &a->expr->where, info->procedure->name,
2376 procedure to make sure it does not change a variable in a DO
2387 const char *errmsg = _("Index variable %qs redefined at %L in procedure %qs "
2395 gfc_error_now (errmsg, do_var->name, &co->loc, info->procedure->name,
2402 gfc_error (errmsg, do_var->name, &co->loc, info->procedure->name
[all...] |
| gfortran.h | 345 /* Procedure types. 7 elements = 3 bits. */
367 IFSRC_IFBODY /* INTERFACE statement or PROCEDURE statement
396 /* Strings for DTIO procedure names. In symbol.cc. */
889 unsigned function:1, subroutine:1, procedure:1; member in struct:__anon13616
920 /* This is set if a contained procedure could be declared pure. This is
925 /* This is set for a procedure that contains expressions referencing
928 an array assignment may be used by an elemental procedure appearing
936 /* Set if this procedure is an alternate entry point. These procedures
941 /* Set if this is the master function for a procedure with multiple
975 components or private components, procedure pointer components
[all...] |
| /src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| symbol.cc | 41 minit ("LABEL", FL_LABEL), minit ("PROCEDURE", FL_PROCEDURE),
90 /* Set the mstrings for DTIO procedure names. */
348 "dummy argument to the BIND(C) procedure %qs at %L",
426 *is_bind_c = "BIND(C)", *procedure = "PROCEDURE", local
427 *proc_pointer = "PROCEDURE POINTER", *abstract = "ABSTRACT",
517 /* Conflicts between SAVE and PROCEDURE will be checked at
525 /* The copying of procedure dummy arguments for module procedures in
532 gfc_error_now ("internal procedure %qs at %L conflicts with "
561 if ((attr->if_source == IFSRC_DECL && !attr->procedure) || attr->contained
[all...] |
| frontend-passes.cc | 2310 procedure. */
2314 gfc_symbol *procedure; member in struct:contained_info
2353 "INTENT(OUT) argument at %L in procedure %qs "
2355 &a->expr->where, info->procedure->name,
2362 "INTENT(INOUT) argument at %L in procedure %qs "
2364 &a->expr->where, info->procedure->name,
2376 procedure to make sure it does not change a variable in a DO
2387 const char *errmsg = _("Index variable %qs redefined at %L in procedure %qs "
2395 gfc_error_now (errmsg, do_var->name, &co->loc, info->procedure->name,
2402 gfc_error (errmsg, do_var->name, &co->loc, info->procedure->name
[all...] |
| gfortran.h | 340 /* Procedure types. 7 elements = 3 bits. */
362 IFSRC_IFBODY /* INTERFACE statement or PROCEDURE statement
391 /* Strings for DTIO procedure names. In symbol.cc. */
881 unsigned function:1, subroutine:1, procedure:1; member in struct:__anon16051
912 /* This is set if a contained procedure could be declared pure. This is
917 /* This is set for a procedure that contains expressions referencing
920 an array assignment may be used by an elemental procedure appearing
928 /* Set if this procedure is an alternate entry point. These procedures
933 /* Set if this is the master function for a procedure with multiple
967 components or private components, procedure pointer components
[all...] |
