This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug libfortran/30405] New: -Wall triggers an ICE


Hi!

Until last week, compiling the following code (actually the original thing, as
this has been quite reduced) used to work, but now triggers and ICE.

Thanks!

Philippe

PS:

Command-line:
gfortran -Wall -c Sources.f90

Sources.f90:
       SUBROUTINE leseEingabe ( String_1, String_2,                    &
     &                  Integer_1, Integer_2, Integer_3, Integer_List, &
     &                                                         Re_Read )
      IMPLICIT   NONE
      LOGICAL, OPTIONAL, INTENT ( IN )  ::   Re_Read
      INTEGER, OPTIONAL, INTENT ( INOUT)::   Integer_1
      INTEGER, OPTIONAL, INTENT ( INOUT)::   Integer_2
      INTEGER, OPTIONAL, INTENT ( INOUT)::   Integer_3
      INTEGER, POINTER,  OPTIONAL       ::   Integer_List(:)
      INTEGER                           ::   Requested_Output
      CHARACTER ( LEN = * ), OPTIONAL,                                 &
     &                 INTENT ( INOUT ) ::   String_1
      CHARACTER ( LEN = * ), OPTIONAL,                                 &
     &                 INTENT ( INOUT ) ::   String_2
      CHARACTER ( LEN = 250 )                          &
     &                                  ::   Var_1, Var_2, Var_3
      IF ( ( MOD(Requested_Output,10) .EQ. 1 ) .OR.                    &
     &     ( MOD(Requested_Output,10) .EQ. 2 ) ) THEN
          IF ( LEN_TRIM(Var_1) .GT. LEN(String_1) ) THEN
              WRITE(Var_2,*) LEN_TRIM(Var_1)
              WRITE(Var_3,*) LEN(String_1)
          ELSE
              String_1 = TRIM(Var_1)
          ENDIF
      ENDIF
      END SUBROUTINE leseEingabe

What I get:
Sources.f90:0: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

What I use:
GNU Fortran 95 (GCC) 4.3.0 20070108 (experimental)
Copyright (C) 2006 Free Software Foundation, Inc.

GNU Fortran comes with NO WARRANTY, to the extent permitted by law.
You may redistribute copies of GNU Fortran
under the terms of the GNU General Public License.
For more information about these matters, see the file named COPYING


-- 
           Summary: -Wall triggers an ICE
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: P dot Schaffnit at access dot rwth-aachen dot de


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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]