OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

(finish_struct): Don't assume that a target integer

Browse Source 
fits in a HOST_WIDE_INT when checking bit-field widths.

From-SVN: r2105
This commit is contained in:
Richard Stallman 1992-09-11 08:52:38 +00:00
parent 1f0c5cc9cf
commit 2d7243898e
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gcc/c-decl.c
View File

@ -4826,24 +4826,24 @@ finish_struct (t, fieldlist)
/* Detect and ignore out of range field width. */ /* Detect and ignore out of range field width. */
if (DECL_INITIAL (x)) if (DECL_INITIAL (x))
{ {
register int width = TREE_INT_CST_LOW (DECL_INITIAL (x)); unsigned HOST_WIDE_INT width = TREE_INT_CST_LOW (DECL_INITIAL (x));
if (width < 0) if (tree_int_cst_lt (DECL_INITIAL (x), integer_zero_node))
{ {
DECL_INITIAL (x) = NULL; DECL_INITIAL (x) = NULL;
error_with_decl (x, "negative width in bit-field `%s'"); error_with_decl (x, "negative width in bit-field `%s'");
} }
else if (TREE_INT_CST_HIGH (DECL_INITIAL (x)) != 0
|| width > TYPE_PRECISION (TREE_TYPE (x)))
{
DECL_INITIAL (x) = NULL;
pedwarn_with_decl (x, "width of `%s' exceeds its type");
}
else if (width == 0 && DECL_NAME (x) != 0) else if (width == 0 && DECL_NAME (x) != 0)
{ {
error_with_decl (x, "zero width for bit-field `%s'"); error_with_decl (x, "zero width for bit-field `%s'");
DECL_INITIAL (x) = NULL; DECL_INITIAL (x) = NULL;
} }
else if (width > TYPE_PRECISION (TREE_TYPE (x))
|| TREE_INT_CST_HIGH (DECL_INITIAL (x)) != 0)
{
DECL_INITIAL (x) = NULL;
pedwarn_with_decl (x, "width of `%s' exceeds its type");
}
} }
/* Process valid field width. */ /* Process valid field width. */