This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Obsolescent character function (Cygwin)
- From: Angelo Graziosi <Angelo dot Graziosi at roma1 dot infn dot it>
- To: fortran at gcc dot gnu dot org
- Date: Tue, 12 Sep 2006 01:03:15 +0200 (MET DST)
- Subject: Obsolescent character function (Cygwin)
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.