Commit af8b342a by Alexandre Petit-Bianco Committed by Alexandre Petit-Bianco

[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
parent 62dab29c
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> Thu May 13 18:30:48 1999 Alexandre Petit-Bianco <apbianco@cygnus.com>
* parse.y (java_check_regular_methods): Warning check on not * parse.y (java_check_regular_methods): Warning check on not
overriding methods with default access in other packages does not overriding methods with default access in other packages does not
apply to `<clinit>'. apply to `<clinit>'.
(java_complete_lhs): If block body is an empty_stmt_node, replace (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> Thu May 13 13:23:38 1999 Alexandre Petit-Bianco <apbianco@cygnus.com>
......
...@@ -475,7 +475,8 @@ check_init (exp, before) ...@@ -475,7 +475,8 @@ check_init (exp, before)
struct alternatives alt; struct alternatives alt;
BEGIN_ALTERNATIVES (before, alt); BEGIN_ALTERNATIVES (before, alt);
alt.block = exp; 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); done_alternative (before, &alt);
END_ALTERNATIVES (before, alt); END_ALTERNATIVES (before, alt);
return; return;
......
...@@ -173,16 +173,6 @@ lang_decode_option (argc, argv) ...@@ -173,16 +173,6 @@ lang_decode_option (argc, argv)
} }
#undef ARG #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') if (p[0] == '-' && p[1] == 'f')
{ {
/* Some kind of -f option. /* Some kind of -f option.
......
...@@ -66,6 +66,13 @@ xref_get_data (flag) ...@@ -66,6 +66,13 @@ xref_get_data (flag)
return xref_table [flag-1].data; 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". */ /* Branch to the right xref "back-end". */
void void
......
...@@ -28,6 +28,7 @@ int xref_flag_value PROTO ((char *)); ...@@ -28,6 +28,7 @@ int xref_flag_value PROTO ((char *));
void expand_xref PROTO ((tree)); void expand_xref PROTO ((tree));
void xref_set_data PROTO ((int, void *)); void xref_set_data PROTO ((int, void *));
void *xref_get_data PROTO ((int)); void *xref_get_data PROTO ((int));
void xref_set_current_fp PROTO ((FILE *));
/* flag_emit_xref range of possible values. */ /* flag_emit_xref range of possible values. */
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment