Home
last modified time | relevance | path

Searched refs:class_ts (Results 1 – 2 of 2) sorted by relevance

/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans-expr.c619 gfc_typespec class_ts, tree vptr, bool optional, in gfc_conv_derived_to_class() argument
632 tmp = gfc_typenode_for_spec (&class_ts); in gfc_conv_derived_to_class()
688 if (class_ts.u.derived->components->as) in gfc_conv_derived_to_class()
746 if (e->rank != class_ts.u.derived->components->as->rank) in gfc_conv_derived_to_class()
748 gcc_assert (class_ts.u.derived->components->as->type in gfc_conv_derived_to_class()
778 if (class_ts.u.derived->components->ts.type == BT_DERIVED in gfc_conv_derived_to_class()
779 && class_ts.u.derived->components->ts.u.derived in gfc_conv_derived_to_class()
824 gfc_typespec class_ts, bool optional) in class_scalar_coarray_to_class() argument
857 var = gfc_typenode_for_spec (&class_ts); in class_scalar_coarray_to_class()
897 gfc_typespec class_ts) in gfc_conv_intrinsic_to_class() argument
[all …]
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans-expr.cc701 gfc_typespec class_ts, tree vptr, bool optional, in gfc_conv_derived_to_class() argument
715 tmp = gfc_typenode_for_spec (&class_ts); in gfc_conv_derived_to_class()
771 if (class_ts.u.derived->components->as) in gfc_conv_derived_to_class()
829 if (e->rank != class_ts.u.derived->components->as->rank) in gfc_conv_derived_to_class()
831 gcc_assert (class_ts.u.derived->components->as->type in gfc_conv_derived_to_class()
871 if (class_ts.u.derived->components->ts.type == BT_DERIVED in gfc_conv_derived_to_class()
872 && class_ts.u.derived->components->ts.u.derived in gfc_conv_derived_to_class()
918 gfc_typespec class_ts, bool optional) in class_scalar_coarray_to_class() argument
951 var = gfc_typenode_for_spec (&class_ts); in class_scalar_coarray_to_class()
991 gfc_typespec class_ts) in gfc_conv_intrinsic_to_class() argument
[all …]