(finish_function): Always warn if main doesn't return int.
authorRichard Kenner <kenner@gcc.gnu.org>
Mon, 8 Apr 1996 18:44:21 +0000 (14:44 -0400)
committerRichard Kenner <kenner@gcc.gnu.org>
Mon, 8 Apr 1996 18:44:21 +0000 (14:44 -0400)
From-SVN: r11674

gcc/c-decl.c

index b737956..6ad09d9 100644 (file)
@@ -6797,19 +6797,19 @@ finish_function (nested)
       setjmp_protect_args ();
     }
 
-#ifdef DEFAULT_MAIN_RETURN
   if (! strcmp (IDENTIFIER_POINTER (DECL_NAME (fndecl)), "main"))
     {
       if (TYPE_MAIN_VARIANT (TREE_TYPE (TREE_TYPE (fndecl)))
          != integer_type_node)
-       warning_with_decl (fndecl, "return type of `%s' is not `int'");
+       pedwarn_with_decl (fndecl, "return type of `%s' is not `int'");
       else
        {
+#ifdef DEFAULT_MAIN_RETURN
          /* Make it so that `main' always returns success by default.  */
          DEFAULT_MAIN_RETURN;
+#endif
        }
     }
-#endif
 
   /* Generate rtl for function exit.  */
   expand_function_end (input_filename, lineno, 0);