procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

com.c (ffecom_transform_equiv_): Make EQUIVALENCEs addressable so that debug info can be attached to their storage.

Browse source 
2000-08-11  G. Helffrich  <george@gly.bris.ac.uk>
            Toon Moene  <toon@moene.indiv.nluug.nl>

	* com.c (ffecom_transform_equiv_): Make EQUIVALENCEs addressable
	so that debug info can be attached to their storage.
	Unconditionally list the storage set aside for them.

Co-Authored-By: Toon Moene <toon@moene.indiv.nluug.nl>

From-SVN: r35637
This commit is contained in:
G. Helffrich 2000-08-11 16:11:08 +00:00 • committed by Toon Moene
parent 87cf27fece
commit a8e2bb7666
2 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
gcc/f/ChangeLog
View file

@ -1,3 +1,10 @@
2000-08-11 G. Helffrich <george@gly.bris.ac.uk>
Toon Moene <toon@moene.indiv.nluug.nl>
* com.c (ffecom_transform_equiv_): Make EQUIVALENCEs addressable
so that debug info can be attached to their storage.
Unconditionally list the storage set aside for them.
2000-08-07 Toon Moene <toon@moene.indiv.nluug.nl>
* g77spec.c (lang_specific_driver): Clearer g77 version message.

3
gcc/f/com.c
View file

@ -8927,6 +8927,7 @@ ffecom_transform_equiv_ (ffestorag eqst)
else
TREE_STATIC (eqt) = 0;
TREE_PUBLIC (eqt) = 0;
TREE_ADDRESSABLE (eqt) = 1; /* Ensure non-register allocation */
DECL_CONTEXT (eqt) = current_function_decl;
if (init)
DECL_INITIAL (eqt) = error_mark_node;
@ -8961,11 +8962,9 @@ ffecom_transform_equiv_ (ffestorag eqst)
ffestorag_set_hook (eqst, eqt);
#ifdef SOMEONE_GETS_DEBUG_SUPPORT_WORKING
ffestorag_drive (ffestorag_list_equivs (eqst),
&ffecom_member_phase2_,
eqst);
#endif
resume_momentary (yes);
}