| /src/external/gpl3/gcc/dist/gcc/fortran/ |
| trans-stmt.cc | 3940 gfc_se tse; local
3954 gfc_init_se (&tse, NULL);
3955 gfc_conv_subref_array_arg (&tse, e, 0, INTENT_IN, false);
3956 gfc_add_block_to_block (pre, &tse.pre);
3957 gfc_add_block_to_block (post, &tse.post);
3958 tse.expr = build_fold_indirect_ref_loc (input_location, tse.expr);
3964 gfc_conv_descriptor_offset_set (pre, tse.expr, tmp);
3969 gfc_init_se (&tse, NULL);
3974 tse.string_length = rse.string_length
4781 gfc_se tse; local
[all...] |
| trans-array.cc | 7623 gfc_se tse; local
7643 gfc_init_se (&tse, NULL);
7648 tse.descriptor_only = 1;
7650 gfc_conv_expr_descriptor (&tse, e);
7652 gfc_conv_expr (&tse, e);
7654 gfc_add_block_to_block (&se->pre, &tse.pre);
7655 gfc_add_block_to_block (&se->post, &tse.post);
7665 tse.string_length);
7669 if (TREE_CODE (tse.expr) == COMPONENT_REF
7670 && TREE_CODE (tse.string_length) == COMPONENT_RE
10266 gfc_se tse; local
10286 gfc_se tse; local
10328 gfc_se tse; local
10528 gfc_se tse; local
[all...] |
| /src/external/gpl3/gcc.old/dist/gcc/fortran/ |
| trans-stmt.cc | 3861 gfc_se tse; local
3875 gfc_init_se (&tse, NULL);
3876 gfc_conv_subref_array_arg (&tse, e, 0, INTENT_IN, false);
3877 gfc_add_block_to_block (pre, &tse.pre);
3878 gfc_add_block_to_block (post, &tse.post);
3879 tse.expr = build_fold_indirect_ref_loc (input_location, tse.expr);
3885 gfc_conv_descriptor_offset_set (pre, tse.expr, tmp);
3890 gfc_init_se (&tse, NULL);
3895 tse.string_length = rse.string_length
4684 gfc_se tse; local
[all...] |
| trans-array.cc | 7310 gfc_se tse; local
7330 gfc_init_se (&tse, NULL);
7335 tse.descriptor_only = 1;
7337 gfc_conv_expr_descriptor (&tse, e);
7339 gfc_conv_expr (&tse, e);
7341 gfc_add_block_to_block (&se->pre, &tse.pre);
7342 gfc_add_block_to_block (&se->post, &tse.post);
7352 tse.string_length);
7356 if (TREE_CODE (tse.expr) == COMPONENT_REF
7357 && TREE_CODE (tse.string_length) == COMPONENT_RE
9887 gfc_se tse; local
9907 gfc_se tse; local
9949 gfc_se tse; local
10128 gfc_se tse; local
[all...] |
