Obsolescent character function (Cygwin)

[Angelo Graziosi]

When I build the following simple test case 


------------------------------------------

program prova
  implicit none
  character(len = 10) :: chfun

  write(*,*) chfun(5),chfun(25)
end program prova

function chfun(x)
  implicit none
  integer :: x
  character(len=*) :: chfun

  write(chfun,'(I10)')  x
end function chfun

------------------------------------------

with

   gfc prova.F95 -o prova

I have:

-------------------------------------
 In file prova.F95:8

function chfun(x)
             1
Warning: CHARACTER(*) function 'chfun' at (1) is obsolescent in fortran 95

--------------------------------------


Why is 'chfun' obsolescent ?


I observe this on Cygwin with GFortran 4.2.0 20060903.


Cheers,

   Angelo.