Searched refs:gfc_new_block (Results 1 - 5 of 5) sorted by relevance

/haiku-buildtools/gcc/gcc/fortran/
H A Dparse.c1259 gfc_new_block = NULL;
2199 gfc_current_ns->proc_name = gfc_new_block;
2287 gfc_new_block = NULL;
2623 push_state (&s, COMP_DERIVED, gfc_new_block);
2625 gfc_new_block->component_access = ACCESS_PUBLIC;
2909 push_state (&s, COMP_ENUM, gfc_new_block);
2966 ? gfc_new_block : NULL;
2986 if (gfc_new_block->attr.pointer)
2988 gfc_new_block->attr.pointer = 0;
2989 gfc_new_block
[all...]
H A Dmatch.h25 /* gfc_new_block points to the symbol of a newly matched block. */
26 extern gfc_symbol *gfc_new_block;
H A Dmatch.c495 (active) block. A matched label is pointed to by gfc_new_block. */
503 gfc_new_block = NULL;
509 if (gfc_get_symbol (name, NULL, &gfc_new_block))
515 if (gfc_new_block->attr.flavor == FL_LABEL)
521 if (!gfc_add_flavor (&gfc_new_block->attr, FL_LABEL,
522 gfc_new_block->name, NULL))
1197 gfc_new_block = sym;
4701 gfc_new_block = NULL;
4715 gfc_new_block = sym;
4868 m = gfc_match (" %s%t", &gfc_new_block);
[all...]
H A Ddecl.c100 /* gfc_new_block points to the symbol of a newly matched block. */
102 gfc_symbol *gfc_new_block; variable
4695 if (gfc_new_block != NULL && sym != NULL
4696 && strcmp (sym->name, gfc_new_block->name) == 0)
5438 gfc_new_block = sym;
5885 gfc_new_block = sym;
7916 gfc_new_block = sym;
H A Dinterface.c227 current_interface.sym = gfc_new_block = sym;

Completed in 77 milliseconds