[Bug fortran/47844] Array stride ignored for pointer-valued function results

[paul.richard.thomas at gmail dot com]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=47844

--- Comment #6 from paul.richard.thomas at gmail dot com <paul.richard.thomas at gmail dot com> 2011-10-05 14:35:14 UTC ---
Dear Tobias and Dominique,

We could fix this in 4.7 by adding a sm field to array descriptors.
If we added the sm field after the dimension array, we would not
damage the exiting API.

On Tue, Mar 1, 2011 at 2:20 PM, burnus at gcc dot gnu.org
<gcc-bugzilla@gcc.gnu.org> wrote:
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=47844
>
> Tobias Burnus <burnus at gcc dot gnu.org> changed:
>
>           What    |Removed                     |Added
> ----------------------------------------------------------------------------
>            Summary|I/O: data transfer          |Array stride ignored for
>                   |statement: Array stride     |pointer-valued function
>                   |ignored for pointer-valued  |results
>                   |function results            |
>
> --- Comment #3 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-03-01 13:20:28 UTC ---
> Does not only affect I/O but also assignment; cf. example below.
>
>  integer, target :: tgt(5) = [1,2,3,4,5]
>  integer :: var(3)
>  var = f(tgt) ! should assign 1 3 5
>  print *, ptr ! but    prints 1 2 3
> contains
>  function f(x)
>    integer, target :: x(:)
>    integer, pointer :: f(:)
>    f => x(::2)
>  end function f
> end
>
> --
> Configure bugmail: http://gcc.gnu.org/bugzilla/userprefs.cgi?tab=email
> ------- You are receiving this mail because: -------
> You are on the CC list for the bug.
>