------- Comment #3 from kargl at gcc dot gnu dot org  2010-05-31 22:20 -------
Interestingly, if one does not use implicit type, one finds that
the following compiles:

      integer, pointer :: p
      integer, target  :: q
      q(i)=i
      p=>q(110)
      print *,p
      end

and 

      integer, pointer :: p
      integer, target  :: q
      integer i
      q(i)=i
      p=>q(110)
      print *,p
      end

and

      real, pointer :: p
      real, target  :: q
      real i
      q(i)=i
      p=>q(110.)
      print *,p
      end

Finally, this one does not compile

      real, pointer :: p
      real, target  :: q
      integer i
      q(i)=i
      p=>q(110)
      print *,p
      end

laptop:kargl[218] gfc4x -o z t.f90 && ./z
t.f90: In function 'MAIN__':
t.f90:5:0: internal compiler error: in fold_convert_loc, at fold-const.c:1920
Please submit a full bug report,
with preprocessed source if appropriate.


-- 


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

Reply via email to