mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-04-06 02:20:34 +08:00
Warning fixes:
* expr.c (build_chill_card): Use &&, not &, when comparing truth values. * parse.c (parse_spec_module): Remove unused variable `module_name', but preserve function call from initialization. (parse_operand6): Mark variable `location' with ATTRIBUTE_UNUSED. * inout.c (init_text_location): Remove unused variable `textlength'. From-SVN: r23106
This commit is contained in:
parent
5557c30d8b
commit
12fe4621bf
@ -1,3 +1,14 @@
|
||||
Thu Oct 15 09:25:21 1998 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
|
||||
|
||||
* expr.c (build_chill_card): Use &&, not &, when comparing truth
|
||||
values.
|
||||
|
||||
* parse.c (parse_spec_module): Remove unused variable
|
||||
`module_name', but preserve function call from initialization.
|
||||
(parse_operand6): Mark variable `location' with ATTRIBUTE_UNUSED.
|
||||
|
||||
* inout.c (init_text_location): Remove unused variable `textlength'.
|
||||
|
||||
Wed Oct 14 22:19:48 1998 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
|
||||
|
||||
* typeck.c (build_chill_cast): Fix typo in assignment statement.
|
||||
|
@ -1372,7 +1372,8 @@ build_chill_card (powerset)
|
||||
{ int size;
|
||||
|
||||
/* Do constant folding, if possible. */
|
||||
if (TREE_CODE (powerset) == CONSTRUCTOR & TREE_CONSTANT (powerset)
|
||||
if (TREE_CODE (powerset) == CONSTRUCTOR
|
||||
&& TREE_CONSTANT (powerset)
|
||||
&& (size = int_size_in_bytes (TREE_TYPE (powerset))) >= 0)
|
||||
{
|
||||
int bit_size = size * BITS_PER_UNIT;
|
||||
|
@ -2221,7 +2221,6 @@ void init_text_location (decl, type)
|
||||
tree type;
|
||||
{
|
||||
tree indexmode = text_indexmode (type);
|
||||
tree textlength = text_length (type);
|
||||
unsigned long accessflags = 0;
|
||||
unsigned long textflags = IO_TEXTLOCATION;
|
||||
tree lowindex = integer_zero_node;
|
||||
|
@ -544,8 +544,9 @@ static void
|
||||
parse_spec_module (label)
|
||||
tree label;
|
||||
{
|
||||
tree module_name = push_module (set_module_name (label), 1);
|
||||
int save_ignoring = ignoring;
|
||||
|
||||
push_module (set_module_name (label), 1);
|
||||
ignoring = pass == 2;
|
||||
FORWARD_TOKEN(); /* SKIP SPEC */
|
||||
expect (MODULE, "expected 'MODULE' here");
|
||||
@ -3144,7 +3145,7 @@ parse_operand6 ()
|
||||
{
|
||||
if (check_token (RECEIVE))
|
||||
{
|
||||
tree location = parse_primval ();
|
||||
tree location ATTRIBUTE_UNUSED = parse_primval ();
|
||||
sorry ("RECEIVE expression");
|
||||
return integer_one_node;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user