c-decl.c (c_expand_body): Check TYPE_SIZE_UNIT (ret_type) is not NULL.

        * c-decl.c (c_expand_body): Check TYPE_SIZE_UNIT (ret_type)
        is not NULL.
        * toplev.c (decode_W_option): Update warn_larger_than
        unconditionally for each processed switch.
        * testsuite/gcc.dg/Wlarger-than.c: New test.

From-SVN: r39352

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 8f5a437bbcc173b3c381c5a5b84dcdc220bae558..407065b84cc8badb685059d3bf2277d780988b36 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,10 @@
+2001-01-30  Neil Booth  <neil@daikokuya.demon.co.uk>
+
+        * c-decl.c (c_expand_body): Check TYPE_SIZE_UNIT (ret_type)
+        is not NULL.
+        * toplev.c (decode_W_option): Update warn_larger_than
+        unconditionally for each processed switch.
+
 2001-01-30  John David Anglin  <dave@hiauly1.hia.nrc.ca>
 
        * pa.c (pa_init_machine_status): Initialize pic_offset_table_save_rtx

diff --git a/gcc/c-decl.c b/gcc/c-decl.c
index d5558db5908cee4c59fc60c6b94f31044b44cde9..edbe9cea5033e395565a0b316da3065eb736bf99 100644 (file)
--- a/gcc/c-decl.c
+++ b/gcc/c-decl.c
@@ -6728,7 +6728,8 @@ c_expand_body (fndecl, nested_p)
     {
       tree ret_type = TREE_TYPE (TREE_TYPE (fndecl));
 
-      if (ret_type && TREE_CODE (TYPE_SIZE_UNIT (ret_type)) == INTEGER_CST
+      if (ret_type && TYPE_SIZE_UNIT (ret_type)
+         && TREE_CODE (TYPE_SIZE_UNIT (ret_type)) == INTEGER_CST
          && 0 < compare_tree_int (TYPE_SIZE_UNIT (ret_type),
                                   larger_than_size))
        {

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index abf39f95de6a1c19b9df0a878e85a87b88608298..a8fd1d3035078c72dbfb4c802cc3603c52c7fe77 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-30  Neil Booth  <neil@daikokuya.demon.co.uk>
+
+        * gcc.dg/Wlarger-than.c: New test.
+
 2001-01-29  Neil Booth  <neil@daikokuya.demon.co.uk>
 
         * gcc.dg/cpp/avoidpaste1.c: Fix typos.

diff --git a/gcc/testsuite/gcc.dg/Wlarger-than.c b/gcc/testsuite/gcc.dg/Wlarger-than.c
new file mode 100644 (file)
index 0000000..609a7ae
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/Wlarger-than.c
@@ -0,0 +1,10 @@
+/* Copyright (C) 2000 Free Software Foundation, Inc.  */
+
+/* { dg-do compile } */
+/* { dg-options "-Wlarger-than-32768" } */
+
+/* -Wlarger-than with functions returning void used to segfault.
+   Source: PR 602, testsuite-ized by Neil Booth 21 Jan 2000.  */
+
+static void foo (void) {}
+

diff --git a/gcc/toplev.c b/gcc/toplev.c
index d29d6c0ae36d7f70585d6a69776021334915882b..64b9bc3c3051ae0f64f2df5e9c750ac9310ae2e8 100644 (file)
--- a/gcc/toplev.c
+++ b/gcc/toplev.c
@@ -4170,8 +4170,7 @@ decode_W_option (arg)
     {
       larger_than_size = read_integral_parameter (option_value, arg - 2, -1);
 
-      if (larger_than_size != -1)
-       warn_larger_than = 1;
+      warn_larger_than = larger_than_size != -1;
     }
   else if (!strcmp (arg, "unused"))
     {