| /src/external/bsd/pcc/dist/pcc/cc/cxxcom/ |
| cxxcode.c | 450 if (cppdebug){ printf("cxxlookup %s\n", SPNAME(p)); symtree(); } 584 symtree(void) function
|
| cxxcode.c | 450 if (cppdebug){ printf("cxxlookup %s\n", SPNAME(p)); symtree(); } 584 symtree(void) function
|
| /src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| primary.cc | 1602 gfc_symtree *symtree; local 1627 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 1633 if (symtree == NULL) 1635 gfc_get_sym_tree (name, NULL, &symtree, false); 1636 gfc_set_sym_referenced (symtree->n.sym); 1642 sym = symtree->n.sym; 1686 e->symtree = symtree; 2062 gfc_symbol *sym = primary->symtree->n.sym; 2234 permissible = tgt_expr && tgt_expr->symtree && tgt_expr->symtree->n.sy 3488 gfc_symtree *symtree; local 3970 gfc_find_sym_tree (gfc_dt_upper_string (name), NULL, 1, &symtree); local [all...] |
| primary.cc | 1602 gfc_symtree *symtree; local 1627 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 1633 if (symtree == NULL) 1635 gfc_get_sym_tree (name, NULL, &symtree, false); 1636 gfc_set_sym_referenced (symtree->n.sym); 1642 sym = symtree->n.sym; 1686 e->symtree = symtree; 2062 gfc_symbol *sym = primary->symtree->n.sym; 2234 permissible = tgt_expr && tgt_expr->symtree && tgt_expr->symtree->n.sy 3488 gfc_symtree *symtree; local 3970 gfc_find_sym_tree (gfc_dt_upper_string (name), NULL, 1, &symtree); local [all...] |
| decl.cc | 291 && new_var->expr->symtree == NULL) 298 sym = new_var->expr->symtree->n.sym; 379 gfc_symtree *symtree; local 411 /* If a parameter inquiry ends up here, symtree is NULL but **result 413 if ((*result)->symtree == NULL 427 if ((*result)->symtree->n.sym->attr.save 428 && (*result)->symtree->n.sym->attr.target) 439 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 442 sym = symtree->n.sym; 457 return gfc_match_structure_constructor (dt_sym, symtree, result) [all...] |
| frontend-passes.cc | 421 fcn->symtree->n.sym->attr.access = ACCESS_PRIVATE; 618 return e->symtree->n.sym->attr.fe_temp; 664 if (e->symtree && e->symtree->n.sym->ts.u.cl 665 && e->symtree->n.sym->ts.u.cl->length 666 && e->symtree->n.sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) 667 return gfc_copy_expr (e->symtree->n.sym->ts.u.cl->length); 737 gfc_get_sym_tree ("__internal_len", current_ns, &fcn->symtree, false); 738 fcn->symtree->n.sym->ts = fcn->ts; 739 fcn->symtree->n.sym->attr.flavor = FL_PROCEDURE 761 gfc_symtree *symtree; local 3745 gfc_symtree *symtree; local [all...] |
| decl.cc | 291 && new_var->expr->symtree == NULL) 298 sym = new_var->expr->symtree->n.sym; 379 gfc_symtree *symtree; local 411 /* If a parameter inquiry ends up here, symtree is NULL but **result 413 if ((*result)->symtree == NULL 427 if ((*result)->symtree->n.sym->attr.save 428 && (*result)->symtree->n.sym->attr.target) 439 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 442 sym = symtree->n.sym; 457 return gfc_match_structure_constructor (dt_sym, symtree, result) [all...] |
| frontend-passes.cc | 421 fcn->symtree->n.sym->attr.access = ACCESS_PRIVATE; 618 return e->symtree->n.sym->attr.fe_temp; 664 if (e->symtree && e->symtree->n.sym->ts.u.cl 665 && e->symtree->n.sym->ts.u.cl->length 666 && e->symtree->n.sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) 667 return gfc_copy_expr (e->symtree->n.sym->ts.u.cl->length); 737 gfc_get_sym_tree ("__internal_len", current_ns, &fcn->symtree, false); 738 fcn->symtree->n.sym->ts = fcn->ts; 739 fcn->symtree->n.sym->attr.flavor = FL_PROCEDURE 761 gfc_symtree *symtree; local 3745 gfc_symtree *symtree; local [all...] |
| module.cc | 57 ( <Symtree name> 163 gfc_symtree *symtree; member in struct:pointer_info::__anon16109::__anon16110 425 to convert the symtree name of a derived-type to the symbol name or to 439 return the symtree-name for a derived type; the symbol name itself and the 440 symtree/symbol name of the associated generic function start with a lower- 945 While symtree names, the name that a particular symbol is known by 3247 /* Save or restore a reference to a symtree node. */ 3262 /* An unused equivalence member; make a symbol and a symtree 3264 if (in_load_equiv && p->u.rsym.symtree == NULL) 3267 p->u.rsym.symtree = gfc_get_unique_symtree (gfc_current_ns) [all...] |
| resolve.cc | 1400 && cons->expr->symtree->n.sym->attr.flavor == FL_PARAMETER) 1459 s2 = cons->expr->symtree->n.sym->result; 1460 name = cons->expr->symtree->n.sym->result->name; 1464 s2 = cons->expr->symtree->n.sym; 1465 name = cons->expr->symtree->n.sym->name; 1548 && (gfc_impure_variable (cons->expr->symtree->n.sym) 1702 if (e->symtree && check_assumed_size_reference (e->symtree->n.sym, e)) 1730 sym = e->symtree->n.sym; 1735 e->symtree = gfc_find_symtree (p->sym->ns->sym_root 10285 gfc_symtree *symtree; local 15505 gfc_symtree *symtree; local [all...] |
| module.cc | 57 ( <Symtree name> 163 gfc_symtree *symtree; member in struct:pointer_info::__anon16109::__anon16110 425 to convert the symtree name of a derived-type to the symbol name or to 439 return the symtree-name for a derived type; the symbol name itself and the 440 symtree/symbol name of the associated generic function start with a lower- 945 While symtree names, the name that a particular symbol is known by 3247 /* Save or restore a reference to a symtree node. */ 3262 /* An unused equivalence member; make a symbol and a symtree 3264 if (in_load_equiv && p->u.rsym.symtree == NULL) 3267 p->u.rsym.symtree = gfc_get_unique_symtree (gfc_current_ns) [all...] |
| resolve.cc | 1400 && cons->expr->symtree->n.sym->attr.flavor == FL_PARAMETER) 1459 s2 = cons->expr->symtree->n.sym->result; 1460 name = cons->expr->symtree->n.sym->result->name; 1464 s2 = cons->expr->symtree->n.sym; 1465 name = cons->expr->symtree->n.sym->name; 1548 && (gfc_impure_variable (cons->expr->symtree->n.sym) 1702 if (e->symtree && check_assumed_size_reference (e->symtree->n.sym, e)) 1730 sym = e->symtree->n.sym; 1735 e->symtree = gfc_find_symtree (p->sym->ns->sym_root 10285 gfc_symtree *symtree; local 15505 gfc_symtree *symtree; local [all...] |
| gfortran.h | 1793 symtree structures that is balanced by the red-black method-- more 1794 than one symtree node can point to any given symbol. */ 2000 /* Within a namespace, symbols are pointed to by symtree nodes that 2481 gfc_symtree *symtree; member in struct:gfc_expr 2582 be taken from symtree/ref. */ 2875 gfc_symtree *st; /* Symtree corresponding to name. */ 2946 gfc_symtree *symtree; member in struct:gfc_code 3114 symtree and later need only that. This way, we can access and call the
|
| /src/external/gpl3/gcc/dist/gcc/fortran/ |
| primary.cc | 1594 gfc_symtree *symtree; local 1619 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 1625 if (symtree == NULL) 1627 gfc_get_sym_tree (name, NULL, &symtree, false); 1628 gfc_set_sym_referenced (symtree->n.sym); 1634 sym = symtree->n.sym; 1678 e->symtree = symtree; 2051 s = e && e->symtree && e->symtree->n.sym ? e->symtree->n.sym : NULL 3633 gfc_symtree *symtree; local 4115 gfc_find_sym_tree (gfc_dt_upper_string (name), NULL, 1, &symtree); local [all...] |
| primary.cc | 1594 gfc_symtree *symtree; local 1619 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 1625 if (symtree == NULL) 1627 gfc_get_sym_tree (name, NULL, &symtree, false); 1628 gfc_set_sym_referenced (symtree->n.sym); 1634 sym = symtree->n.sym; 1678 e->symtree = symtree; 2051 s = e && e->symtree && e->symtree->n.sym ? e->symtree->n.sym : NULL 3633 gfc_symtree *symtree; local 4115 gfc_find_sym_tree (gfc_dt_upper_string (name), NULL, 1, &symtree); local [all...] |
| decl.cc | 291 && new_var->expr->symtree == NULL) 298 sym = new_var->expr->symtree->n.sym; 379 gfc_symtree *symtree; local 411 /* If a parameter inquiry ends up here, symtree is NULL but **result 413 if ((*result)->symtree == NULL 427 if ((*result)->symtree 428 && (*result)->symtree->n.sym->attr.save 429 && (*result)->symtree->n.sym->attr.target) 440 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 443 sym = symtree->n.sym [all...] |
| frontend-passes.cc | 421 fcn->symtree->n.sym->attr.access = ACCESS_PRIVATE; 618 return e->symtree->n.sym->attr.fe_temp; 664 if (e->symtree && e->symtree->n.sym->ts.u.cl 665 && e->symtree->n.sym->ts.u.cl->length 666 && e->symtree->n.sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) 667 return gfc_copy_expr (e->symtree->n.sym->ts.u.cl->length); 737 gfc_get_sym_tree ("__internal_len", current_ns, &fcn->symtree, false); 738 fcn->symtree->n.sym->ts = fcn->ts; 739 fcn->symtree->n.sym->attr.flavor = FL_PROCEDURE 761 gfc_symtree *symtree; local 3760 gfc_symtree *symtree; local [all...] |
| decl.cc | 291 && new_var->expr->symtree == NULL) 298 sym = new_var->expr->symtree->n.sym; 379 gfc_symtree *symtree; local 411 /* If a parameter inquiry ends up here, symtree is NULL but **result 413 if ((*result)->symtree == NULL 427 if ((*result)->symtree 428 && (*result)->symtree->n.sym->attr.save 429 && (*result)->symtree->n.sym->attr.target) 440 if (gfc_find_sym_tree (name, NULL, 1, &symtree)) 443 sym = symtree->n.sym [all...] |
| frontend-passes.cc | 421 fcn->symtree->n.sym->attr.access = ACCESS_PRIVATE; 618 return e->symtree->n.sym->attr.fe_temp; 664 if (e->symtree && e->symtree->n.sym->ts.u.cl 665 && e->symtree->n.sym->ts.u.cl->length 666 && e->symtree->n.sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) 667 return gfc_copy_expr (e->symtree->n.sym->ts.u.cl->length); 737 gfc_get_sym_tree ("__internal_len", current_ns, &fcn->symtree, false); 738 fcn->symtree->n.sym->ts = fcn->ts; 739 fcn->symtree->n.sym->attr.flavor = FL_PROCEDURE 761 gfc_symtree *symtree; local 3760 gfc_symtree *symtree; local [all...] |
| module.cc | 57 ( <Symtree name> 163 gfc_symtree *symtree; member in struct:pointer_info::__anon13677::__anon13678 425 to convert the symtree name of a derived-type to the symbol name or to 439 return the symtree-name for a derived type; the symbol name itself and the 440 symtree/symbol name of the associated generic function start with a lower- 945 While symtree names, the name that a particular symbol is known by 3266 /* Save or restore a reference to a symtree node. */ 3281 /* An unused equivalence member; make a symbol and a symtree 3283 if (in_load_equiv && p->u.rsym.symtree == NULL) 3286 p->u.rsym.symtree = gfc_get_unique_symtree (gfc_current_ns) [all...] |
| resolve.cc | 1430 && cons->expr->symtree->n.sym->attr.flavor == FL_PARAMETER) 1489 s2 = cons->expr->symtree->n.sym->result; 1490 name = cons->expr->symtree->n.sym->result->name; 1494 s2 = cons->expr->symtree->n.sym; 1495 name = cons->expr->symtree->n.sym->name; 1578 && (gfc_impure_variable (cons->expr->symtree->n.sym) 1732 if (e->symtree && check_assumed_size_reference (e->symtree->n.sym, e)) 1760 sym = e->symtree->n.sym; 1765 e->symtree = gfc_find_symtree (p->sym->ns->sym_root 10751 gfc_symtree *symtree; local 16327 gfc_symtree *symtree; local [all...] |
| module.cc | 57 ( <Symtree name> 163 gfc_symtree *symtree; member in struct:pointer_info::__anon13677::__anon13678 425 to convert the symtree name of a derived-type to the symbol name or to 439 return the symtree-name for a derived type; the symbol name itself and the 440 symtree/symbol name of the associated generic function start with a lower- 945 While symtree names, the name that a particular symbol is known by 3266 /* Save or restore a reference to a symtree node. */ 3281 /* An unused equivalence member; make a symbol and a symtree 3283 if (in_load_equiv && p->u.rsym.symtree == NULL) 3286 p->u.rsym.symtree = gfc_get_unique_symtree (gfc_current_ns) [all...] |
| resolve.cc | 1430 && cons->expr->symtree->n.sym->attr.flavor == FL_PARAMETER) 1489 s2 = cons->expr->symtree->n.sym->result; 1490 name = cons->expr->symtree->n.sym->result->name; 1494 s2 = cons->expr->symtree->n.sym; 1495 name = cons->expr->symtree->n.sym->name; 1578 && (gfc_impure_variable (cons->expr->symtree->n.sym) 1732 if (e->symtree && check_assumed_size_reference (e->symtree->n.sym, e)) 1760 sym = e->symtree->n.sym; 1765 e->symtree = gfc_find_symtree (p->sym->ns->sym_root 10751 gfc_symtree *symtree; local 16327 gfc_symtree *symtree; local [all...] |
| gfortran.h | 1840 symtree structures that is balanced by the red-black method-- more 1841 than one symtree node can point to any given symbol. */ 2079 /* Within a namespace, symbols are pointed to by symtree nodes that 2571 gfc_symtree *symtree; member in struct:gfc_expr 2672 be taken from symtree/ref. */ 2974 gfc_symtree *st; /* Symtree corresponding to name. */ 3050 gfc_symtree *symtree; member in struct:gfc_code 3220 symtree and later need only that. This way, we can access and call the 4050 && expr->symtree->n.sym->assoc \ 4051 && expr->symtree->n.sym->assoc->inferred_type [all...] |
| gfortran.h | 1840 symtree structures that is balanced by the red-black method-- more 1841 than one symtree node can point to any given symbol. */ 2079 /* Within a namespace, symbols are pointed to by symtree nodes that 2571 gfc_symtree *symtree; member in struct:gfc_expr 2672 be taken from symtree/ref. */ 2974 gfc_symtree *st; /* Symtree corresponding to name. */ 3050 gfc_symtree *symtree; member in struct:gfc_code 3220 symtree and later need only that. This way, we can access and call the 4050 && expr->symtree->n.sym->assoc \ 4051 && expr->symtree->n.sym->assoc->inferred_type [all...] |