Searched refs:tbp (Results 1 - 10 of 10) sorted by relevance
/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/ |
H A D | spec_expr_6.f90 | 16 procedure, nopass :: tbp => p1_type 21 integer, dimension(t1%p1(), t2%tbp()) :: table 38 procedure, nopass :: tbp => p1_type 44 integer, dimension(t2%tbp()) :: table2 ! { dg-error "must be PURE" }
|
H A D | elemental_dependency_5.f90 | 17 PROCEDURE(Fred_ifc), DEFERRED, PASS :: tbp 21 PROCEDURE :: tbp => Fred 48 array%f = array%tbp(index) 56 dummy%f = dummy%tbp(index)
|
H A D | coarray_8.f90 | 13 procedure :: tbp => sub 33 call x%tbp() ! OK 34 call x[1]%tbp ! OK, not polymorphic 40 call y%tbp() ! OK 41 call y[1]%tbp ! OK, coindexed polymorphic object but not poly. subobj. 47 call z%poly%tbp() ! OK 48 call z[1]%poly%tbp ! { dg-error "Polymorphic subobject of coindexed" }
|
/haiku-buildtools/gcc/gcc/fortran/ |
H A D | primary.c | 1943 gfc_symtree *tbp; local 1952 tbp = gfc_find_typebound_proc (sym, &t, name, false, &gfc_current_locus); 1954 tbp = NULL; 1956 if (tbp) 1971 if (tbp->n.tb->is_generic) 1974 tbp_sym = tbp->n.tb->u.specific->n.sym; 1977 primary->value.compcall.tbp = tbp->n.tb; 1978 primary->value.compcall.name = tbp->name; 1988 m = gfc_match_actual_arglist (tbp [all...] |
H A D | resolve.c | 5407 gfc_typebound_proc* tbp; local 5409 tbp = e->value.compcall.tbp; 5411 if (tbp->error) 5418 if (tbp->nopass || e->value.compcall.ignore_pass) 5424 gcc_assert (tbp->pass_arg_num > 0); 5426 tbp->pass_arg_num, 5427 tbp->pass_arg); 5511 of ABSTRACT type (as in subobject%abstract_parent%tbp()). */ 5538 if (e->value.compcall.tbp 9335 gfc_typebound_proc* tbp; local [all...] |
H A D | symbol.c | 3246 gfc_typebound_proc *tbp; local 3259 FOR_EACH_VEC_ELT (latest_undo_chgset->tbps, i, tbp) 3260 tbp->error = 0;
|
H A D | gfortran.h | 2034 gfc_typebound_proc* tbp; /* Should overlap with esym. */ member in struct:gfc_expr::__anon120::__anon123
|
H A D | expr.c | 380 q->value.compcall.tbp = p->value.compcall.tbp;
|
H A D | interface.c | 3735 e->value.compcall.tbp = target;
|
H A D | trans-expr.c | 8719 gcc_assert (!expr->value.compcall.tbp->is_generic); 8720 func_ifc = expr->value.compcall.tbp->u.specific->n.sym;
|
Completed in 364 milliseconds