com.c (ffecom_lookup_label): Set DECL_CONTEXT for FORMAT label to current_function_decl.

2001-01-15  Mark Mitchell  <mark@codesourcery.com>

	* com.c (ffecom_lookup_label): Set DECL_CONTEXT for FORMAT
	label to current_function_decl.

From-SVN: r39042
This commit is contained in:
Mark Mitchell 2001-01-15 16:52:49 +00:00 committed by Toon Moene
parent 9f1630a988
commit 611081b288
2 changed files with 6 additions and 1 deletions

View File

@ -1,3 +1,8 @@
2001-01-15 Mark Mitchell <mark@codesourcery.com>
* com.c (ffecom_lookup_label): Set DECL_CONTEXT for FORMAT
label to current_function_decl.
Fri Jan 12 17:21:33 2001 Joseph S. Myers <jsm28@cam.ac.uk>
* g77spec.c (lang_specific_driver): Update copyright year to 2001.

View File

@ -12264,7 +12264,7 @@ ffecom_lookup_label (ffelab label)
1, 0));
TREE_CONSTANT (glabel) = 1;
TREE_STATIC (glabel) = 1;
DECL_CONTEXT (glabel) = 0;
DECL_CONTEXT (glabel) = current_function_decl;
DECL_INITIAL (glabel) = NULL;
make_decl_rtl (glabel, NULL);
expand_decl (glabel);