Searched refs:gfc_current_block (Results 1 - 10 of 10) sorted by relevance
/netbsd-current/external/gpl3/gcc.old/dist/gcc/fortran/ |
H A D | parse.h | 61 #define gfc_current_block() (gfc_state_stack->sym) macro
|
H A D | parse.c | 173 if (gfc_current_block ()->result->ts.type != BT_DERIVED) 313 && gfc_current_block ()->result->ts.kind == -1) 651 && gfc_current_block ()->result->ts.kind == -1) 838 && gfc_current_block ()->result->ts.kind == -1) 2847 gcc_assert (gfc_current_block ()); 2851 if (gfc_current_block ()->attr.sequence) 2853 " section at %C", gfc_current_block ()->name); 2854 if (gfc_current_block ()->attr.is_bind_c) 2856 " section at %C", gfc_current_block ()->name); 3211 if (!gfc_add_component (gfc_current_block (), u [all...] |
H A D | decl.c | 2198 && current_ts.u.derived == gfc_current_block () 2223 if (gfc_current_block ()->attr.pointer && (*as)->rank != 0) 2262 if (!gfc_add_component (gfc_current_block(), name, &c)) 2330 gfc_find_symbol (c->name, gfc_current_block ()->f2k_derived, 2336 c->name, &gfc_current_block ()->declared_at); 2471 gfc_symbol *block = gfc_current_block (); 2822 && strcmp ("ppr@", gfc_current_block ()->name) == 0 2823 && strcmp (name, gfc_current_block ()->ns->proc_name->name) == 0) 2827 && strcmp (name, gfc_current_block ()->name) == 0 2828 && gfc_current_block () [all...] |
H A D | match.c | 1723 || gfc_current_block () == NULL 1730 if (strcmp (name, gfc_current_block ()->name) != 0) 1733 name, gfc_current_block ()->name); 1772 || (gfc_current_block () 1783 || gfc_current_block () == NULL 1790 if (strcmp (name, gfc_current_block ()->name) != 0) 1793 name, &where, gfc_current_block ()->name); 6114 if (!gfc_current_block ()) 6123 if (strcmp (name, gfc_current_block ()->name) != 0) 6126 gfc_current_block () [all...] |
H A D | symbol.c | 2681 ns = gfc_current_block ()->f2k_derived; 3246 && gfc_current_block ()->attr.pdt_template) 3248 gfc_symbol *der = gfc_current_block ();
|
/netbsd-current/external/gpl3/gcc/dist/gcc/fortran/ |
H A D | parse.h | 61 #define gfc_current_block() (gfc_state_stack->sym) macro
|
H A D | parse.cc | 175 if (gfc_current_block ()->result->ts.type != BT_DERIVED) 315 && gfc_current_block ()->result->ts.kind == -1) 645 && gfc_current_block ()->result->ts.kind == -1) 842 && gfc_current_block ()->result->ts.kind == -1) 3093 gcc_assert (gfc_current_block ()); 3097 if (gfc_current_block ()->attr.sequence) 3099 " section at %C", gfc_current_block ()->name); 3100 if (gfc_current_block ()->attr.is_bind_c) 3102 " section at %C", gfc_current_block ()->name); 3457 if (!gfc_add_component (gfc_current_block (), u [all...] |
H A D | decl.cc | 2280 && current_ts.u.derived == gfc_current_block () 2305 if (gfc_current_block ()->attr.pointer && (*as)->rank != 0) 2344 if (!gfc_add_component (gfc_current_block(), name, &c)) 2412 gfc_find_symbol (c->name, gfc_current_block ()->f2k_derived, 2418 c->name, &gfc_current_block ()->declared_at); 2553 gfc_symbol *block = gfc_current_block (); 2912 && strcmp ("ppr@", gfc_current_block ()->name) == 0 2913 && strcmp (name, gfc_current_block ()->ns->proc_name->name) == 0) 2917 && strcmp (name, gfc_current_block ()->name) == 0 2918 && gfc_current_block () [all...] |
H A D | match.cc | 1698 || gfc_current_block () == NULL 1705 if (strcmp (name, gfc_current_block ()->name) != 0) 1708 name, gfc_current_block ()->name); 1747 || (gfc_current_block () 1758 || gfc_current_block () == NULL 1765 if (strcmp (name, gfc_current_block ()->name) != 0) 1768 name, &where, gfc_current_block ()->name); 6205 if (!gfc_current_block ()) 6214 if (strcmp (name, gfc_current_block ()->name) != 0) 6217 gfc_current_block () [all...] |
H A D | symbol.cc | 2688 ns = gfc_current_block ()->f2k_derived; 3260 && gfc_current_block ()->attr.pdt_template) 3262 gfc_symbol *der = gfc_current_block ();
|
Completed in 326 milliseconds