This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran 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] PR 38252 FUNCTION rejected if both specification and execution part are empty

From: Mikael Morin <mikael dot morin at tele2 dot fr>
To: correctifs gcc <gcc-patches at gcc dot gnu dot org>, gfortran <fortran at gcc dot gnu dot org>
Date: Fri, 28 Nov 2008 16:07:48 +0100
Subject: Re: [Patch, Fortran] PR 38252 FUNCTION rejected if both specification and execution part are empty
References: <492F0DF7.5080908@tele2.fr>

Mikael Morin wrote:
> Hi,
> 
> this fixes PR 38252 where this was rejected:
> 
> INTEGER FUNCTION test ()
> CONTAINS
> END FUNCTION test

Here is an other way to fix the same problem (I prefer this one).

This also passes the testsuite without regression.

Mikael


2008-11-28  Mikael Morin  <mikael.morin@tele2.fr>

	PR fortran/38252
	* parse.c (parse_spec): Skip statement order check in case
	of a CONTAINS statement.

2008-11-28  Mikael Morin  <mikael.morin@tele2.fr>

	PR fortran/38252
	* gfortran.dg/empty_function_1.f90: New test.

Attachment: pr38252_05.diff
Description: Text document

Follow-Ups:
- Re: [Patch, Fortran] PR 38252 FUNCTION rejected if both specification and execution part are empty
  - From: Tobias Burnus

References:
- [Patch, Fortran] PR 38252 FUNCTION rejected if both specification and execution part are empty
  - From: Mikael Morin

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