This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/71649] New: Internal compiler error
- From: "jack.saba at nasa dot gov" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Fri, 24 Jun 2016 15:31:11 +0000
- Subject: [Bug fortran/71649] New: Internal compiler error
- Auto-submitted: auto-generated
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=71649
Bug ID: 71649
Summary: Internal compiler error
Product: gcc
Version: unknown
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: jack.saba at nasa dot gov
Target Milestone: ---
MAC-bash: gfortran -c -Wall -Wextra -fno-strict-aliasing -fwrapv test.f90
f951: internal compiler error: Segmentation fault: 11
f951: internal compiler error: Abort trap: 6
gfortran: internal compiler error: Abort trap: 6 (program f951)
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.
Computer info:
Darwin Kernel Version 15.5.0: Tue Apr 19 18:36:36 PDT 2016;
root:xnu-3248.50.21~8/RELEASE_X86_64 x86_64
Here's the code, based on the example in section 9.65 of gfortran.pdf
SUBROUTINE Compiler_Options ( Options, Version, WriteOpt )
USE ISO_FORTRAN_ENV, ONLY : Compiler_Version, Compiler_Options
IMPLICIT NONE
CHARACTER (LEN=*), INTENT(OUT) :: Options
CHARACTER (LEN=*), INTENT(OUT) :: Version
LOGICAL, INTENT(IN), OPTIONAL :: WriteOpt
!----------------------------------------------------------------------------
Version = Compiler_Version()
Options = Compiler_Options()
IF ( PRESENT(WriteOpt) ) THEN
IF ( WriteOpt ) &
PRINT '(A)', 'This file was compiled using gfortran by ' &
// TRIM(Version) // ' using the options ' // TRIM(Options)
END IF
RETURN
END SUBROUTINE Compiler_Options