The following program

PROGRAM p
   INTEGER(KIND=4) :: A
   INTEGER(KIND=8) :: B

   A = NOT(0)
   B = NOT(0)
   PRINT *, A, B

   B = NOT(0_8)
   PRINT *, A, B
END PROGRAM p 

yields the following output in gfortran

          -1           4294967295
          -1                   -1 

while the expected result is

          -1                   -1
          -1                   -1


-- 
           Summary: Kind of constants in generic intrinsics
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: rofi at ya dot com


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

Reply via email to