This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [patch, fortran]PR25829 Add support for F2003 I/O features
- From: Jerry DeLisle <jvdelisle at verizon dot net>
- To: Tobias Burnus <burnus at net-b dot de>
- Cc: gcc-patches at gcc dot gnu dot org, fortran at gcc dot gnu dot org
- Date: Thu, 03 Apr 2008 21:35:39 -0700
- Subject: Re: [patch, fortran]PR25829 Add support for F2003 I/O features
- References: <20080401211028.GA31075@net-b.de>
On Tue, 2008-04-01 at 23:10 +0200, Tobias Burnus wrote:
> > Please give it a spin and test if you can. Any test cases people are
> > willing to submit would be welcome.
>
> DECIMAL="comma" does not work properly:
>
> integer :: i
> real :: a(10) = [ (i*1.3, i=1,10) ]
> namelist /nm/ a
> write(*,nml=nm,decimal='comma')
> end
>
> This should print
> &nm a = 1,3; 2,6; ...
> but it prints:
> &nm a = 1,3, 2,6, ...
>
> * * *
>
> The following program should print:
> 1.3 4.0 5.0 5.0 7.0 0.0
> but gfortran has:
> Fortran runtime error: Cannot match namelist object name
>
> implicit none
> integer :: i
> real :: a(6) = 0.0
> character(len=30) :: str = '&nm a = 1,3; 4, 5; 5; 7; /'
> namelist /nm/ a
> read(str,nml=nm,decimal='comma')
> print *, a
> end
>
> * * *
>
> + notify_std (&dtp->common, GFC_STD_F2003, "DC or DP descriptor "
>
> Please use also in libgfortran the "Fortran 2003:" prefix.
>
> * * *
>
> The patch looks otherwise OK. It would be great if some others could
> do some tests or code review as well. The code is too big to quickly
> see whether everything is correct or whether checks are missing or ...
>
> Tobias,
> who is looking forward to the updated patch
I have all these cases working. Doing more testing.
Jerry