| /src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| resolve.cc | 1017 resolve_common_blocks (gfc_symtree *common_root)
1022 if (common_root == NULL)
1025 if (common_root->left)
1026 resolve_common_blocks (common_root->left);
1027 if (common_root->right)
1028 resolve_common_blocks (common_root->right);
1030 resolve_common_vars (common_root->n.common, true);
1035 if (!common_root->n.common->binding_label
1039 common_root->n.common->name);
1043 && ((common_root->n.common->binding_labe
[all...] |
| trans-common.cc | 231 be in the common_root. We also need the binding label, if it's bind(c).
1391 gfc_traverse_symtree (ns->common_root, named_common);
|
| symbol.cc | 3499 head->name as the common_root symtree's name might be mangled. */
3676 st0 = find_common_symtree (p->ns->common_root,
3681 gfc_delete_bbt (&p->ns->common_root, &st, compare_symtree);
4055 free_common_tree (ns->common_root);
|
| match.cc | 5190 st = gfc_new_symtree (&gfc_current_ns->common_root, mangled_name);
5194 st = gfc_find_symtree (gfc_current_ns->common_root, name);
5197 st = gfc_new_symtree (&gfc_current_ns->common_root, name);
|
| gfortran.h | 2057 gfc_symtree *common_root; member in struct:gfc_namespace
|
| openmp.cc | 381 st = gfc_find_symtree (gfc_current_ns->common_root, n);
482 st = gfc_find_symtree (gfc_current_ns->common_root, n);
802 st = gfc_find_symtree (gfc_current_ns->common_root, n);
5099 st = gfc_find_symtree (gfc_current_ns->common_root, n);
|
| module.cc | 6352 write_common (gfc_current_ns->common_root);
|
| /src/external/gpl3/gcc/dist/gcc/fortran/ |
| resolve.cc | 1066 resolve_common_blocks (gfc_symtree *common_root)
1071 if (common_root == NULL)
1074 if (common_root->left)
1075 resolve_common_blocks (common_root->left);
1076 if (common_root->right)
1077 resolve_common_blocks (common_root->right);
1079 resolve_common_vars (common_root->n.common, true);
1084 if (!common_root->n.common->binding_label
1088 common_root->n.common->name);
1092 && ((common_root->n.common->binding_labe
[all...] |
| trans-common.cc | 231 be in the common_root. We also need the binding label, if it's bind(c).
1391 gfc_traverse_symtree (ns->common_root, named_common);
|
| symbol.cc | 3618 head->name as the common_root symtree's name might be mangled. */
3818 st0 = find_common_symtree (p->ns->common_root,
3823 gfc_delete_bbt (&p->ns->common_root, &st, compare_symtree);
4205 free_common_tree (ns->common_root);
|
| match.cc | 5199 st = gfc_new_symtree (&gfc_current_ns->common_root, mangled_name);
5203 st = gfc_find_symtree (gfc_current_ns->common_root, name);
5206 st = gfc_new_symtree (&gfc_current_ns->common_root, name);
|
| gfortran.h | 2137 gfc_symtree *common_root; member in struct:gfc_namespace
|
| openmp.cc | 515 st = gfc_find_symtree (gfc_current_ns->common_root, n);
616 st = gfc_find_symtree (gfc_current_ns->common_root, n);
946 st = gfc_find_symtree (gfc_current_ns->common_root, n);
6162 st = gfc_find_symtree (gfc_current_ns->common_root, n);
|
| module.cc | 6371 write_common (gfc_current_ns->common_root);
|
