Home | History | Annotate | Download | only in fortran

Lines Matching defs:fptrse

9597   gfc_se fptrse;
9611   gfc_init_se (&fptrse, NULL);
9614       fptrse.want_pointer = 1;
9615       gfc_conv_expr (&fptrse, arg->next->expr);
9616       gfc_add_block_to_block (&se.pre, &fptrse.pre);
9617       gfc_add_block_to_block (&se.post, &fptrse.post);
9620 	fptrse.expr = build_fold_indirect_ref_loc (input_location,
9621 						       fptrse.expr);
9623 				 TREE_TYPE (fptrse.expr),
9624 				 fptrse.expr,
9625 				 fold_convert (TREE_TYPE (fptrse.expr),
9635   fptrse.descriptor_only = 1;
9636   gfc_conv_expr_descriptor (&fptrse, arg->next->expr);
9637   gfc_add_block_to_block (&block, &fptrse.pre);
9638   desc = fptrse.expr;
9700   gfc_add_block_to_block (&block, &fptrse.post);