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

com.c (ffecom_sym_transform_): Install FFEINFO_whereGLOBAL symbols in the global binding level.

Browse source 
* com.c (ffecom_sym_transform_): Install FFEINFO_whereGLOBAL
        symbols in the global binding level.

From-SVN: r67920
This commit is contained in:
Richard Henderson 2003-06-13 16:28:49 -07:00 • committed by Richard Henderson
parent 1f2cd13074
commit eb7f48f94b
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/f/ChangeLog
View file

@ -1,3 +1,8 @@
2003-06-13 Richard Henderson <rth@redhat.com>
* com.c (ffecom_sym_transform_): Install FFEINFO_whereGLOBAL
symbols in the global binding level.
Sun Jun 8 15:42:09 2003 Neil Booth <neil@daikokuya.co.uk>
* Make-lang.in (F77_OBJS, f77.mostlyclean, f/com.o): Update.

4
gcc/f/com.c
View file

@ -8078,8 +8078,8 @@ ffecom_sym_transform_ (ffesymbol s)
DECL_EXTERNAL (t) = 1;
TREE_PUBLIC (t) = 1;
t = start_decl (t, FALSE);
finish_decl (t, NULL_TREE, FALSE);
t = start_decl (t, TRUE);
finish_decl (t, NULL_TREE, TRUE);
if ((g != NULL)
&& ((ffeglobal_type (g) == FFEGLOBAL_typeSUBR)