Lines Matching refs:current_interface
3506 current_interface.ns = gfc_current_ns; in parse_interface()
3507 save = current_interface; in parse_interface()
3509 sym = (current_interface.type == INTERFACE_GENERIC in parse_interface()
3510 || current_interface.type == INTERFACE_USER_OP) in parse_interface()
3517 gfc_current_ns = gfc_get_namespace (current_interface.ns, 0); in parse_interface()
3558 gfc_current_ns = current_interface.ns; in parse_interface()
3571 if (current_interface.type == INTERFACE_GENERIC in parse_interface()
3582 if (current_interface.type == INTERFACE_ABSTRACT) in parse_interface()
3627 if (current_interface.type != INTERFACE_ABSTRACT && !prog_unit->attr.dummy) in parse_interface()
3630 current_interface = save; in parse_interface()
3634 if (current_interface.ns in parse_interface()
3635 && current_interface.ns->proc_name in parse_interface()
3636 && strcmp (current_interface.ns->proc_name->name, in parse_interface()
3640 ¤t_interface.ns->proc_name->declared_at); in parse_interface()