2007-03-02 Paul Thomas <pault@gcc.gnu.org>

[pf3gnuchains/gcc-fork.git] / gcc / fortran / decl.c

diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c
index aaa1157..f6ffc1d 100644 (file)
--- a/gcc/fortran/decl.c
+++ b/gcc/fortran/decl.c
@@ -3030,12 +3030,6 @@ gfc_match_entry (void)
 
          entry->result = result;
        }
-
-      if (proc->attr.recursive && result == NULL)
-       {
-         gfc_error ("RESULT attribute required in ENTRY statement at %C");
-         return MATCH_ERROR;
-       }
     }
 
   if (gfc_match_eos () != MATCH_YES)