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



Vladimir Fuka <vladimir.fuka at gmail dot com> changed:



           What    |Removed                     |Added

----------------------------------------------------------------------------

                 CC|                            |vladimir.fuka at gmail dot

                   |                            |com



--- Comment #5 from Vladimir Fuka <vladimir.fuka at gmail dot com> 2013-04-21 
19:11:38 UTC ---

Is this the same bug?:



    elemental function BigEnd32(x) result(res)

      use iso_fortran_env

      real(real32) :: res

      real(real32),intent(in)::x

      integer(int8),dimension(4):: bytes



      bytes = transfer(x,bytes,4)

      res = transfer(bytes(4:1:-1),res)



    end function BigEnd32



Warning: Intrinsic TRANSFER at (1) has partly undefined result: source size 1 <

result size 4

Reply via email to