Lines Matching defs:pdt
114 /* Used to store the parameter list arising in a PDT declaration and
115 in the typespec of a PDT variable or component. */
3785 /* The PDT template symbol. */
3786 gfc_symbol *pdt = *sym;
3789 /* The hoped for instance of the PDT. */
3791 /* The list of parameters appearing in the PDT declaration. */
3798 /* Used to build up the name of the PDT instance. The prefix uses 4
3813 type_param_name_list = pdt->formal;
3815 sprintf (name, "Pdt%s", pdt->name);
3818 parameter values or use the default values in the PDT declaration. */
3844 c1 = gfc_find_component (pdt, param->name, false, true, NULL);
3847 if (!pdt->attr.use_assoc && !c1)
3888 expressions in the PDT instance. */
3973 /* Now we search for the PDT instance 'name'. If it doesn't exist, we
3974 build it, using 'pdt' as a template. */
3975 if (gfc_get_symbol (name, pdt->ns, &instance))
3995 gfc_copy_attr (&instance->attr, &pdt->attr, &pdt->declared_at);
4002 c1 = pdt->components;
4023 && c1 == pdt->components
4043 /* Now obtain the PDT instance for the extended type. */
4165 /* Recurse into this function for PDT components. */
4180 /* Now obtain the PDT instance for the component. */
10482 /* Here we have "TYPE <name>". Check for <TYPE IS (> or a PDT declaration
Indexes created Wed May 06 00:24:28 UTC 2026