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

            Bug ID: 77603
           Summary: ICE: Segmentation fault (program f951)
           Product: gcc
           Version: 7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fort...@t-online.de
  Target Milestone: ---

Invalid code with a cyclic length declaration.
Related to pr77602, basically an analogous problem with a somewhat
different behaviour. Generates an ever growing file "m.mod0".
Similar to argument_checking_7.f90 from testsuite, i.e. pr31306.


$ cat z1.f90
module m
contains
   function zfn(x,y)
      implicit character(len(zfn)) (x)
      implicit character(len(x)+1) (y)
      implicit character(len(y)-1) (z)
      intent(in) :: x, y
      character(len(y)-1) :: zfn
      integer :: i = 1
      zfn = achar(max(iachar(x(i:i)),iachar(y(i:i))))
   end
end


$ time gfortran-7-20160911 -c z1.f90
gfortran: internal compiler error: Segmentation fault (program f951)
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

real    2m1.084s
user    1m41.855s
sys     0m2.465s

Reply via email to