Searched refs:gfc_new_block (Results 1 - 5 of 5) sorted by relevance
/haiku-buildtools/gcc/gcc/fortran/ |
H A D | parse.c | 1259 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 D | match.h | 25 /* gfc_new_block points to the symbol of a newly matched block. */ 26 extern gfc_symbol *gfc_new_block;
|
H A D | match.c | 495 (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 D | decl.c | 100 /* 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 D | interface.c | 227 current_interface.sym = gfc_new_block = sym;
|
Completed in 77 milliseconds