The following program gives a compile time segmentation fault.
Changing the third argument to CSHIFT to either MF1 or -1 fixes 
the problem.

I didn't experiment with a unary minus expression for the 
second argument.

Dick Hendrickson

      SUBROUTINE RA0072(DDA,LDA,nf10,nf1,mf1,nf2)
! fails on Windows XP
! gcc version 4.4.0 20080312 (experimental) [trunk revision 133139]
!compile time seq fault

      REAL DDA(10,10)
      LOGICAL LDA(10,10)

      WHERE (LDA) DDA = CSHIFT(DDA,1,-MF1)  ! MF1 works, -1 works

      END SUBROUTINE



C:\g_experiments\gfortran>gfortran ra0072.f
f951.exe: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.


-- 
           Summary: Compile time segmentation fault for CSHIFT with negative
                    third arg
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dick dot hendrickson at gmail dot com


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

Reply via email to