------- Comment #13 from fxcoudert at gcc dot gnu dot org  2006-10-17 10:45 
-------
LBOUND and UBOUND also need to be fixed in simplify.c:

program fred

  call jackal (3, 2)

contains

  subroutine jackal (b, c)
    integer :: b, c
    integer :: soda(b:c, 1:2)

    print *, "SIZE = ", size(soda)
    print *, "LBOUND (soda, DIM) = ", ubound (soda, 1), ubound(soda, 2)
    print *, "LBOUND (soda)      = ", ubound (soda)

  end subroutine jackal
end

gives:

 SIZE =            0
 LBOUND (soda, DIM) =            2           2
 LBOUND (soda)      =            2           0

(from PR29489)


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
      Known to fail|4.1.2                       |4.1.2 4.2.0
      Known to work|4.2.0                       |


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

Reply via email to