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

            Bug ID: 64416
           Summary: RFE: Support REAL128 on arm
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: orion at cora dot nwra.com

SUBROUTINE PMPI_Sizeof_complex128_scalar(x, size, ierror)
        USE, INTRINSIC :: iso_fortran_env, ONLY: REAL128
      COMPLEX(REAL128)::x
        INTEGER, INTENT(OUT) :: size
        INTEGER, INTENT(OUT) :: ierror

        size = storage_size(x) / 8
        ierror = 0
      END SUBROUTINE PMPI_Sizeof_complex128_scalar

gfortran -c psizeof_f.f90 
psizeof_f.f90:3.21:

      COMPLEX(REAL128)::x
                     1
Error: Kind -1 not supported for type COMPLEX at (1)

Linux fedora-rawhide-arm 3.18.1-2.fc22.armv7hl+lpae #1 SMP Fri Dec 19 00:19:30
UTC 2014 armv7l armv7l armv7l GNU/Linux

Is it possible to add support for this, or can the architecture not handle it?

Reply via email to