This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [PATCH] fortran/44797 -- inquire's exist shall be default logical


Steve Kargl wrote:
> The standard requires a default logical for the EXIST
> tag in an inquire statement.  gfortran has an extension
> to accept any logical kind.  However, if -std=f95 or
> -std=f2003 is given gfortran does not issue an error.
> This patch fixes that shortcoming.
>
> OK for trunk?
>   

OK if you change GFC_STD_GNU into GFC_STD_F2008. While F95 has

R924 inquire-spec ... or EXIST = scalar-default-logical-variable

and F2003 has

R930 inquire-spec ... EXIST = scalar-default-logical-variable

F2008 FDIS allows it:

R931 inquire-spec ... EXIST = scalar-logical-variable

Tobias

> 2010-07-03  Steven G. Kargl  <kargl@gcc.gnu.org>
>
> 	PR fortran/44797
> 	* fortran/io.c (resolve_tag): Check EXIST is a default logical


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]