--- Comment #4 from burnus at gcc dot gnu dot org 2007-03-02 23:03 ---
Subject: Bug 30873
Author: burnus
Date: Fri Mar 2 23:03:26 2007
New Revision: 122495
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=122495
Log:
2007-03-02 Paul Thomas <[EMAIL PROTECTED]>
Tobias
--- Comment #3 from burnus at gcc dot gnu dot org 2007-02-21 13:53 ---
> Removing the error call
> if (proc->attr.recursive && result == NULL)
> {
> gfc_error ("RESULT attribute required in ENTRY statement at %C");
> return MATCH_ERROR;
> }
> at
--- Comment #2 from pault at gcc dot gnu dot org 2007-02-21 11:02 ---
Removing the error call
if (proc->attr.recursive && result == NULL)
{
gfc_error ("RESULT attribute required in ENTRY statement at %C");
return MATCH_ERROR;
}
at decl.c:3032 f
--- Comment #1 from burnus at gcc dot gnu dot org 2007-02-20 16:24 ---
ENTRY E1(I)
1
Error: RESULT attribute required in ENTRY statement at (1)
Note: It works if one removes the "recursive".
Compiles just fine with nagf95, ifort and g95.
Ad hoc I don't see anything in the