PR 18314

	* c-decl.c (diagnose_mismatched_decls): Also discard a
	built-in if we encounter an old-style definition with the
	same name.
testsuite:
	* gcc.dg/builtins-30.c: New testcase.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@76441 138bc75d-0d04-0410-961f-82ee72b054a4

2 files changed, 32 insertions, 0 deletions

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 20b71833ae3..848ca88e605 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2004-01-23  Zack Weinberg  <zack@codesourcery.com>
+
+	PR 18314
+	* gcc.dg/builtins-30.c: New testcase.
+
 2004-01-23  Andreas Tobler  <a.tobler@schweiz.ch>
 
 	* g++.dg/compat/compat.exp: Add LD_LIBRARY_PATH_32/64 for Solaris.
diff --git a/gcc/testsuite/gcc.dg/builtins-30.c b/gcc/testsuite/gcc.dg/builtins-30.c
new file mode 100644
index 00000000000..a2d7433b4c7
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/builtins-30.c
@@ -0,0 +1,27 @@
+/* { dg-do compile } */
+/* { dg-options "-Wall -Wshadow" } */
+
+extern double strtod (const char *, char **);
+#define UNUSED __attribute__ ((unused))
+
+/* A built-in function may be overridden by an old-style definition
+   specifying too few arguments... */
+double nan ()
+{
+  return strtod ("nan", 0);  /* { dg-warning "shadowing built-in" } */
+}
+
+/* the right number, but the wrong type, arguments... */
+float nanf (foo)
+     int foo UNUSED;
+{
+  return strtod ("nan", 0);  /* { dg-warning "shadowing built-in" } */
+}
+
+/* or too many arguments.  */
+long double nanl (foo, bar)
+     const char *foo UNUSED;
+     int bar UNUSED;
+{
+  return strtod ("nan", 0);  /* { dg-warning "shadowing built-in" } */
+}