[Bug fortran/78290] Gfortran incorrectly creates a copy of an array passed to an array pointer dummy argument

[anlauf at gmx dot de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78290

--- Comment #3 from Harald Anlauf <anlauf at gmx dot de> ---
(In reply to Harald Anlauf from comment #2)
> internal compiler error: in gfc_add_modify_loc, at fortran/trans.c:159
> 0x835756e gfc_add_modify_loc(unsigned int, stmtblock_t*, tree_node*,
> tree_node*)
>         ../../trunk/gcc/fortran/trans.c:158
> 0x83575e7 gfc_add_modify(stmtblock_t*, tree_node*, tree_node*)
>         ../../trunk/gcc/fortran/trans.c:170
> 0x83a90eb gfc_trans_pointer_assignment(gfc_expr*, gfc_expr*)
>         ../../trunk/gcc/fortran/trans-expr.c:8267
> 0x83a9688 gfc_trans_pointer_assign(gfc_code*)
>         ../../trunk/gcc/fortran/trans-expr.c:8054
> 0x8358357 trans_code
>         ../../trunk/gcc/fortran/trans.c:1714
> 0x838d62c gfc_generate_function_code(gfc_namespace*)
>         ../../trunk/gcc/fortran/trans-decl.c:6261
> 0x830d833 translate_all_program_units
>         ../../trunk/gcc/fortran/parse.c:6038
> 0x830d833 gfc_parse_file()
>         ../../trunk/gcc/fortran/parse.c:6238
> 0x8352db5 gfc_be_parse_file
>         ../../trunk/gcc/fortran/f95-lang.c:202

The ICE location and traceback seem to be related to PR 69604.