------- Comment #20 from fxcoudert at gcc dot gnu dot org  2007-10-03 08:08 
-------
Further reduced testcase:

  integer i(1)
  print *, transfer(achar(i), "x")
  end

The type mismatch disappears if you change the transfer statement into
transfer(["x"]), "x", so this is a problem in the return type of achar in
trans-intrinsic.c, I think.

Also, there are an interesting number of ICEs for testcases differing only
slightly with the one reported here, including:

  integer i(1)
  print *, transfer(char(i), "x")
  end

and

  character(len=1) :: string
  print *, transfer(((transfer(string,"x",1))), "x")
  end


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Last reconfirmed|2007-07-03 10:40:16         |2007-10-03 08:08:50
               date|                            |


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

Reply via email to