| /netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
| H A D | resolve.cc | 1017 resolve_common_blocks (gfc_symtree *common_root) in resolve_common_blocks() argument
1022 if (common_root == NULL) in resolve_common_blocks()
1025 if (common_root->left) in resolve_common_blocks()
1026 resolve_common_blocks (common_root->left); in resolve_common_blocks()
1027 if (common_root->right) in resolve_common_blocks()
1028 resolve_common_blocks (common_root->right); in resolve_common_blocks()
1030 resolve_common_vars (common_root->n.common, true); in resolve_common_blocks()
1035 if (!common_root->n.common->binding_label in resolve_common_blocks()
1039 common_root->n.common->name); in resolve_common_blocks()
1043 && ((common_root->n.common->binding_label in resolve_common_blocks()
[all …]
|
| H A D | trans-common.cc | 1391 gfc_traverse_symtree (ns->common_root, named_common); in gfc_trans_common()
|
| H A D | symbol.cc | 3676 st0 = find_common_symtree (p->ns->common_root, in gfc_restore_last_undo_checkpoint()
3681 gfc_delete_bbt (&p->ns->common_root, &st, compare_symtree); in gfc_restore_last_undo_checkpoint()
4055 free_common_tree (ns->common_root); in gfc_free_namespace()
|
| H A D | match.cc | 5190 st = gfc_new_symtree (&gfc_current_ns->common_root, mangled_name); in gfc_get_common()
5194 st = gfc_find_symtree (gfc_current_ns->common_root, name); in gfc_get_common()
5197 st = gfc_new_symtree (&gfc_current_ns->common_root, name); in gfc_get_common()
|
| H A D | openmp.cc | 381 st = gfc_find_symtree (gfc_current_ns->common_root, n); in gfc_match_omp_variable_list()
482 st = gfc_find_symtree (gfc_current_ns->common_root, n); in gfc_match_omp_to_link()
802 st = gfc_find_symtree (gfc_current_ns->common_root, n); in gfc_match_oacc_clause_link()
5099 st = gfc_find_symtree (gfc_current_ns->common_root, n); in gfc_match_omp_threadprivate()
|
| H A D | gfortran.h | 2053 gfc_symtree *common_root; member
|
| H A D | dump-parse-tree.cc | 3461 gfc_traverse_symtree (ns->common_root, show_common); in show_namespace()
|
| H A D | ChangeLog-2008 | 3941 gfc_current_ns->common_root and set gfc_current_ns->common_root
|
| H A D | module.cc | 6352 write_common (gfc_current_ns->common_root); in write_module()
|
| H A D | ChangeLog-2004 | 1735 (gfc_namespace): Add field 'common_root'; change type of field
|
| /netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| H A D | resolve.c | 993 resolve_common_blocks (gfc_symtree *common_root) in resolve_common_blocks() argument
998 if (common_root == NULL) in resolve_common_blocks()
1001 if (common_root->left) in resolve_common_blocks()
1002 resolve_common_blocks (common_root->left); in resolve_common_blocks()
1003 if (common_root->right) in resolve_common_blocks()
1004 resolve_common_blocks (common_root->right); in resolve_common_blocks()
1006 resolve_common_vars (common_root->n.common, true); in resolve_common_blocks()
1011 if (!common_root->n.common->binding_label in resolve_common_blocks()
1015 common_root->n.common->name); in resolve_common_blocks()
1019 && ((common_root->n.common->binding_label in resolve_common_blocks()
[all …]
|
| H A D | trans-common.c | 1362 gfc_traverse_symtree (ns->common_root, named_common); in gfc_trans_common()
|
| H A D | symbol.c | 3662 st0 = find_common_symtree (p->ns->common_root, in gfc_restore_last_undo_checkpoint()
3667 gfc_delete_bbt (&p->ns->common_root, &st, compare_symtree); in gfc_restore_last_undo_checkpoint()
4037 free_common_tree (ns->common_root); in gfc_free_namespace()
|
| H A D | openmp.c | 312 st = gfc_find_symtree (gfc_current_ns->common_root, n);
413 st = gfc_find_symtree (gfc_current_ns->common_root, n); in gfc_match_omp_to_link()
708 st = gfc_find_symtree (gfc_current_ns->common_root, n); in gfc_match_oacc_clause_link()
3338 st = gfc_find_symtree (gfc_current_ns->common_root, n); in gfc_match_omp_threadprivate()
|
| H A D | match.c | 5149 st = gfc_new_symtree (&gfc_current_ns->common_root, mangled_name); in gfc_get_common()
5153 st = gfc_find_symtree (gfc_current_ns->common_root, name); in gfc_get_common()
5156 st = gfc_new_symtree (&gfc_current_ns->common_root, name); in gfc_get_common()
|
| H A D | gfortran.h | 1798 gfc_symtree *common_root; member
|
| H A D | dump-parse-tree.c | 3127 gfc_traverse_symtree (ns->common_root, show_common); in show_namespace()
|
| H A D | module.c | 6141 write_common (gfc_current_ns->common_root); in write_module()
|