README for gfortran.dg/g77

Billinghurst, David (CALCRTS) david.billinghurst@comalco.riotinto.com.au
Tue Jul 13 03:02:00 GMT 2004


Steve Kargl wrote:
> On Tue, Jul 13, 2004 at 10:36:55AM +1000, Billinghurst, David
> (CALCRTS) wrote: 
>> 
>> 	N	This feature will not be supported by gfortran.
>> 
> Is there anything in this category?  I thought we were aiming
> for full backwards compatibility with g77.  I'll note that there
> are 87 unimplemented intrinsic functions and subroutines in g77
> runtime library that are extensions to the F77 standard.

Nothing yet, but there are tests for some nasty command line options.
Do we really want to support:
 -fonetrip
 -fugly-assumed
 -fnotypeless-boz

>> 19990905-0.f			F  Needs a language lawyer
>> 
> Ftnchek says its legal Fortran 77.
> 
> kargl[209] ftnchek -f77=all 19990905-0.f
> 
> FTNCHEK Version 3.2 November 2002
> 
> File 19990905-0.f:
>  0 syntax errors detected in file 19990905-0.f
> No main program found
> Warning: Common block INFO Elements used but never set: all
> 
> 
> Whoops, in looking at the gfortran error message, I thought I
> sent a PR for this, because I have this noted in private testsuite
> as a failure.
>> 

OK.  I will try and xfail it.

>> 970125-0.f			F  Need to investigate
>> 
> 
> This uses %LOC(), which is a (bad IMNSHO) extension for Fortran.
> 

Will copy across and xfail.

>> 
>> 980519-2.f			F  Need to investigate
>> 
> This is illegal code.
> 
> kargl[218] ftnchek 980519-2.f
> 
> FTNCHEK Version 3.2 November 2002
> 
> File 980519-2.f:
>      41       real in(jT_f-hd_T:jT_l)
>                       ^
> Error near line 41 col 15 file 980519-2.f: integer dimension expected
>      43       in(jT_f-hd_T) = Xsp
>                  ^
> Warning near line 43 col 10 file 980519-2.f: subscript is not integer
>      44       in(jT_f-hd_T + 1) = Ysp
>                  ^
> Warning near line 44 col 10 file 980519-2.f: subscript is not integer
>      45       in(jT_f-hd_T + 2) = Xrcv
>                  ^
> Warning near line 45 col 10 file 980519-2.f: subscript is not integer
>      46       in(jT_f-hd_T + 3) = Yrcv
>                  ^
> Warning near line 46 col 10 file 980519-2.f: subscript is not integer
> 
>  1 syntax error detected in file 980519-2.f
>  4 warnings issued in file 980519-2.f
> 
> kargl[219] f95 -c 980519-2.f
> Obsolescent: 980519-2.f, line 29: Fixed source form
> Error: 980519-2.f, line 41: Array bound is not integer scalar
> Errors in declarations, no further processing for SIMUL_TRACE
> [f95 error termination]


>> 
>> 990115-1.f			F  Investigate
>> 
> 
> This uses a non-integral DO LOOP bounds.  See PR 16222.

Original source has "INTEGER RANK".  Will add to test.



More information about the Fortran mailing list