Lines Matching refs:module_ns
9902 gfc_namespace *module_ns; in gfc_match_modproc() local
9915 module_ns = gfc_current_ns->parent; in gfc_match_modproc()
9916 for (; module_ns; module_ns = module_ns->parent) in gfc_match_modproc()
9917 if (module_ns->proc_name->attr.flavor == FL_MODULE in gfc_match_modproc()
9918 || module_ns->proc_name->attr.flavor == FL_PROGRAM in gfc_match_modproc()
9919 || (module_ns->proc_name->attr.flavor == FL_PROCEDURE in gfc_match_modproc()
9920 && !module_ns->proc_name->attr.contained)) in gfc_match_modproc()
9923 if (module_ns == NULL) in gfc_match_modproc()
9963 if (gfc_get_symbol (name, module_ns, &sym)) in gfc_match_modproc()
11521 gfc_namespace* module_ns; in gfc_match_final_decl() local
11553 module_ns = gfc_current_ns; in gfc_match_final_decl()
11554 gcc_assert (module_ns); in gfc_match_final_decl()
11555 gcc_assert (module_ns->proc_name->attr.flavor == FL_MODULE); in gfc_match_final_decl()
11591 if (gfc_get_symbol (name, module_ns, &sym)) in gfc_match_final_decl()