Home | History | Annotate | Download | only in fortran

Lines Matching defs:fcn

1419   tree fcn;
1439 fcn = gfc_class_vtab_copy_get (from);
1441 fcn = gfc_class_vtab_copy_get (to);
1443 fcn_type = TREE_TYPE (TREE_TYPE (fcn));
1549 tmp = build_call_vec (fcn_type, fcn, args);
1570 tmp = build_call_vec (fcn_type, fcn, args);
1606 stdcopy = build_call_vec (fcn_type, fcn, args);
1613 extcopy = build_call_vec (fcn_type, unshare_expr (fcn), args);
1775 tree fcn;
1833 fcn = gfc_vptr_copy_get (gfc_class_vptr_get (rse_expr));
1834 fcn = build_fold_indirect_ref_loc (input_location, fcn);
1837 tmp = build_call_expr_loc (input_location, fcn, 2, tmp,
1847 fcn = gfc_vptr_final_get (gfc_class_vptr_get (rse_expr));
1848 zero = build_int_cst (TREE_TYPE (fcn), 0);
1850 logical_type_node, fcn, zero);
1851 fcn = build_fold_indirect_ref_loc (input_location, fcn);
1852 tmp = build_call_expr_loc (input_location, fcn, 1, class_data);
11454 tree tmp, fcn, stdcopy, to_len, from_len, vptr, old_vptr;
11515 fcn = gfc_vptr_copy_get (vptr);
11548 stdcopy = build_call_vec (TREE_TYPE (TREE_TYPE (fcn)), fcn, args);
11555 extcopy = build_call_vec (TREE_TYPE (TREE_TYPE (fcn)), fcn, args);
11955 tree fcn = gfc_vptr_copy_get (tmp);
11956 if (POINTER_TYPE_P (TREE_TYPE (fcn)))
11957 fcn = build_fold_indirect_ref_loc (input_location, fcn);
11959 fcn, 2,