[multiple changes]
Fri May 14 12:31:08 1999 Alexandre Petit-Bianco <apbianco@cygnus.com> * xref.c (xref_set_current_fp): New function, defined. * xref.h (xref_set_current_fp): New function, prototyped. Fri May 14 11:57:54 1999 Alexandre Petit-Bianco <apbianco@cygnus.com> * check-init.c (check_init): Take into account that LABELED_BLOCK_STMT can be empty. From-SVN: r26935
This commit is contained in:
parent
62dab29cd2
commit
af8b342afe
@ -1,10 +1,21 @@
|
||||
Fri May 14 12:31:08 1999 Alexandre Petit-Bianco <apbianco@cygnus.com>
|
||||
|
||||
* xref.c (xref_set_current_fp): New function, defined.
|
||||
* xref.h (xref_set_current_fp): New function, prototyped.
|
||||
|
||||
Fri May 14 11:57:54 1999 Alexandre Petit-Bianco <apbianco@cygnus.com>
|
||||
|
||||
* check-init.c (check_init): Take into account that
|
||||
LABELED_BLOCK_STMT can be empty.
|
||||
|
||||
Thu May 13 18:30:48 1999 Alexandre Petit-Bianco <apbianco@cygnus.com>
|
||||
|
||||
* parse.y (java_check_regular_methods): Warning check on not
|
||||
overriding methods with default access in other packages does not
|
||||
apply to `<clinit>'.
|
||||
(java_complete_lhs): If block body is an empty_stmt_node, replace
|
||||
it by NULL_TREE. This avoid gcc generating an irrelevant warning.
|
||||
it by NULL_TREE. This prevents gcc from generating an irrelevant
|
||||
warning.
|
||||
|
||||
Thu May 13 13:23:38 1999 Alexandre Petit-Bianco <apbianco@cygnus.com>
|
||||
|
||||
|
@ -475,7 +475,8 @@ check_init (exp, before)
|
||||
struct alternatives alt;
|
||||
BEGIN_ALTERNATIVES (before, alt);
|
||||
alt.block = exp;
|
||||
check_init (LABELED_BLOCK_BODY (exp), before);
|
||||
if (LABELED_BLOCK_BODY (exp))
|
||||
check_init (LABELED_BLOCK_BODY (exp), before);
|
||||
done_alternative (before, &alt);
|
||||
END_ALTERNATIVES (before, alt);
|
||||
return;
|
||||
|
@ -173,16 +173,6 @@ lang_decode_option (argc, argv)
|
||||
}
|
||||
#undef ARG
|
||||
|
||||
#define XARG "-fxref="
|
||||
if (strncmp (p, XARG, sizeof (XARG) - 1) == 0)
|
||||
{
|
||||
if (!(flag_emit_xref = xref_flag_value (p + sizeof (XARG) - 1)))
|
||||
error ("Unkown xref format `%s'", p + sizeof (XARG) - 1);
|
||||
else
|
||||
return 1;
|
||||
}
|
||||
#undef XARG
|
||||
|
||||
if (p[0] == '-' && p[1] == 'f')
|
||||
{
|
||||
/* Some kind of -f option.
|
||||
|
@ -66,6 +66,13 @@ xref_get_data (flag)
|
||||
return xref_table [flag-1].data;
|
||||
}
|
||||
|
||||
void
|
||||
xref_set_current_fp (fp)
|
||||
FILE *fp;
|
||||
{
|
||||
xref_table [flag_emit_xref-1].fp = fp;
|
||||
}
|
||||
|
||||
/* Branch to the right xref "back-end". */
|
||||
|
||||
void
|
||||
|
@ -28,6 +28,7 @@ int xref_flag_value PROTO ((char *));
|
||||
void expand_xref PROTO ((tree));
|
||||
void xref_set_data PROTO ((int, void *));
|
||||
void *xref_get_data PROTO ((int));
|
||||
void xref_set_current_fp PROTO ((FILE *));
|
||||
|
||||
/* flag_emit_xref range of possible values. */
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user