From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 3532 invoked by alias); 12 Dec 2011 22:35:23 -0000 Received: (qmail 3450 invoked by uid 22791); 12 Dec 2011 22:35:21 -0000 X-SWARE-Spam-Status: No, hits=-2.9 required=5.0 tests=ALL_TRUSTED,AWL,BAYES_00 X-Spam-Check-By: sourceware.org Received: from localhost (HELO gcc.gnu.org) (127.0.0.1) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Mon, 12 Dec 2011 22:35:07 +0000 From: "adrian at llnl dot gov" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/51520] New: ICE in gfortran 4.6.2, x86_64 Date: Mon, 12 Dec 2011 22:54:00 -0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: new X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Keywords: X-Bugzilla-Severity: major X-Bugzilla-Who: adrian at llnl dot gov X-Bugzilla-Status: UNCONFIRMED X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Changed-Fields: Message-ID: X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2011-12/txt/msg01306.txt.bz2 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D51520 Bug #: 51520 Summary: ICE in gfortran 4.6.2, x86_64 Classification: Unclassified Product: gcc Version: 4.6.2 Status: UNCONFIRMED Severity: major Priority: P3 Component: fortran AssignedTo: unassigned@gcc.gnu.org ReportedBy: adrian@llnl.gov I'm getting an ICE in gfortran 4.6.2 . The machine is running Ubuntu 10.04, 64 bit on an Intel Xeon. $ gfortran -I. -O0 -c -o test.o test.f03=20 test.f03: In function =E2=80=98evalresa=E2=80=99: test.f03:40:0: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See for instructions. below is the nonsensical delta-reduced test program: test.f03=20 =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D module sidl use, intrinsic :: iso_c_binding enum, bind(c) enumerator :: sidl_row_major_order =3D 2 end enum interface end interface contains logical function sidl_opaque_is_null_p (opaq)=20 end function sidl_opaque_is_null_p end module sidl module sidl_array_type use sidl type sidl__array type(c_ptr) :: d_array =3D c_null_ptr end type sidl__array end module sidl_array_type module sidl_array_array_F03 use sidl_array_type interface is_null module procedure is_null_p end interface contains logical function is_null_p(array) type(sidl__array), intent(in) :: array end function is_null_p end module sidl_array_array_F03 module vect_Utils_F03 use sidl_array_array_F03 type vect_Utils_t end type vect_Utils_t interface is_null module procedure is_null_s end interface contains logical function is_null_s(ext) class(vect_Utils_t), intent(in) :: ext end function is_null_s end module vect_Utils_F03 subroutine evalResA(tracker, partNum, res, expected, tol, okay) use vect_Utils_F03 type (sidl__array) :: res, expected if (.not. is_null(res)) then endif end subroutine evalResA subroutine runProduct(tracker, partNum, a, u, tol, badLvl, res, okay, expectExc, desc) if (expectExc .eq. NoneExp) then call evalResA(tracker, partNum, x, res, tol, okay) endif end subroutine runProduct program vectortest call runProduct(tracker, partNum, ZERO, n, TOL, NoVio, n, .true., NoneExp= ,& 'passing vuProduct() a null array - no precondition vio ') end program vectortest =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D valgrind output: =3D=3D18442=3D=3D Invalid read of size 1 =3D=3D18442=3D=3D at 0x5F49EE: mpz_get_double_int (double-int.c:1145) =3D=3D18442=3D=3D by 0x550521: gfc_conv_mpz_to_tree (trans-const.c:204) =3D=3D18442=3D=3D by 0x550D2F: gfc_conv_constant (trans-const.c:396) =3D=3D18442=3D=3D by 0x5650FB: gfc_conv_initializer (trans-expr.c:4155) =3D=3D18442=3D=3D by 0x55D80B: gfc_conv_structure (trans-expr.c:4666) =3D=3D18442=3D=3D by 0x5651EB: gfc_conv_initializer (trans-expr.c:4197) =3D=3D18442=3D=3D by 0x554620: gfc_get_symbol_decl (trans-decl.c:1379) =3D=3D18442=3D=3D by 0x554C2F: generate_local_decl (trans-decl.c:4161) =3D=3D18442=3D=3D by 0x52BD26: traverse_ns (symbol.c:3333) =3D=3D18442=3D=3D by 0x52BD15: traverse_ns (symbol.c:3330) =3D=3D18442=3D=3D by 0x52BD15: traverse_ns (symbol.c:3330) =3D=3D18442=3D=3D by 0x52BD15: traverse_ns (symbol.c:3330) =3D=3D18442=3D=3D Address 0x2 is not stack'd, malloc'd or (recently) free'd =3D=3D18442=3D=3D=20 test.f03: In function =E2=80=98evalresa=E2=80=99: test.f03:40:0: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See for instructions. =3D=3D18442=3D=3D=20 =3D=3D18442=3D=3D HEAP SUMMARY: =3D=3D18442=3D=3D in use at exit: 868,466 bytes in 3,301 blocks =3D=3D18442=3D=3D total heap usage: 8,088 allocs, 4,787 frees, 1,634,007 = bytes allocated =3D=3D18442=3D=3D=20 =3D=3D18442=3D=3D LEAK SUMMARY: =3D=3D18442=3D=3D definitely lost: 12,428 bytes in 74 blocks =3D=3D18442=3D=3D indirectly lost: 3,496 bytes in 5 blocks =3D=3D18442=3D=3D possibly lost: 352 bytes in 18 blocks =3D=3D18442=3D=3D still reachable: 852,190 bytes in 3,204 blocks =3D=3D18442=3D=3D suppressed: 0 bytes in 0 blocks =3D=3D18442=3D=3D Rerun with --leak-check=3Dfull to see details of leaked m= emory =3D=3D18442=3D=3D=20 =3D=3D18442=3D=3D For counts of detected and suppressed errors, rerun with:= -v =3D=3D18442=3D=3D ERROR SUMMARY: 1 errors from 1 contexts (suppressed: 4 fr= om 4) =3D=3D18439=3D=3D=20 =3D=3D18439=3D=3D HEAP SUMMARY: =3D=3D18439=3D=3D in use at exit: 32,293 bytes in 86 blocks =3D=3D18439=3D=3D total heap usage: 502 allocs, 416 frees, 61,072 bytes a= llocated =3D=3D18439=3D=3D=20 =3D=3D18439=3D=3D LEAK SUMMARY: =3D=3D18439=3D=3D definitely lost: 5,444 bytes in 29 blocks =3D=3D18439=3D=3D indirectly lost: 45 bytes in 3 blocks =3D=3D18439=3D=3D possibly lost: 29 bytes in 2 blocks =3D=3D18439=3D=3D still reachable: 26,775 bytes in 52 blocks =3D=3D18439=3D=3D suppressed: 0 bytes in 0 blocks =3D=3D18439=3D=3D Rerun with --leak-check=3Dfull to see details of leaked m= emory =3D=3D18439=3D=3D=20 =3D=3D18439=3D=3D For counts of detected and suppressed errors, rerun with:= -v =3D=3D18439=3D=3D ERROR SUMMARY: 0 errors from 0 contexts (suppressed: 4 fr= om 4)