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

            Bug ID: 59604
           Summary: Constant comparisons with -fno-range-check and
                    int(z'...')
           Product: gcc
           Version: 4.9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: tkoenig at gcc dot gnu.org

Trying out a fix for PR 58003, I found that the following program was of the
opinion that -1 does not equal -1:

ig25@linux-fd1f:~/Krempel/NoRange> cat bar.f90
program test
  use iso_fortran_env
  implicit none

  integer, parameter :: wt = int32

  print *, int(z'FFFFFFFF',wt)
  print *, int(z'FFFFFFFF',wt) /= -1

end program test
ig25@linux-fd1f:~/Krempel/NoRange> gfortran -fno-range-check bar.f90 
ig25@linux-fd1f:~/Krempel/NoRange> ./a.out
          -1
 T

Reply via email to