https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89431

            Bug ID: 89431
           Summary: CPP integer macros not defined
           Product: gcc
           Version: 9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: mark.eggleston at codethink dot com
  Target Milestone: ---

The integer macros specified in the "Preprocessing and conditional compilation"
section of the manual do not exist. The real macros on the other hand do.

On x86_64:

program test
  use iso_fortran_env
  implicit none
  write(*,*) integer_kinds
#ifdef __GFC_INTEGER_1__
  write(*,*) "__GFC_INTEGER_1__ defined"
#else
  write(*,*) "__GFC_INTEGER_1__ undefined"
#endif
#ifdef __GFC_INTEGER_2__
  write(*,*) "__GFC_INTEGER_2__ defined"
#else
  write(*,*) "__GFC_INTEGER_2__ undefined"
#endif
#ifdef __GFC_INTEGER_8__
  write(*,*) "__GFC_INTEGER_8__ defined"
#else
  write(*,*) "__GFC_INTEGER_8__ undefined"
#endif
#ifdef __GFC_INTEGER_16__
  write(*,*) "__GFC_INTEGER_16__ defined"
#else
  write(*,*) "__GFC_INTEGER_16__ undefined"
#endif
  write(*,*) real_kinds
#ifdef __GFC_REAL_10__
  write(*,*) "__GFC_REAL_10__ defined"
#else
  write(*,*) "__GFC_REAL_10__ undefined"
#endif
#ifdef __GFC_REAL_10__
  write(*,*) "__GFC_REAL_16__ defined"
#else
  write(*,*) "__GFC_REAL_16__ undefined"
#endif
end program

produces

           1           2           4           8          16
 __GFC_INTEGER_1__ undefined
 __GFC_INTEGER_2__ undefined
 __GFC_INTEGER_8__ undefined
 __GFC_INTEGER_16__ undefined
           4           8          10          16
 __GFC_REAL_10__ defined
 __GFC_REAL_16__ defined

Also present on 8.2 and 7.4

Reply via email to