This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[egcs 1.1] Minor g77 fix
- To: d dot love at dl dot ac dot uk
- Subject: [egcs 1.1] Minor g77 fix
- From: Craig Burley <burley at gnu dot org>
- Date: Sun, 26 Jul 1998 14:56:29 -0400 (EDT)
- Cc: egcs-patches at cygnus dot com
- Cc: burley at gnu dot org
Dave, could you apply this to the 1.1 branch as well as the mainline?
tq vm, (burley)
Sat Jul 25 17:23:55 1998 Craig Burley <burley@gnu.org>
Fix 980615-0.f:
* stc.c (ffestc_R1229_start): Set info to ANY as well.
*** g77-e/gcc/f/stc.c.~1~ Tue May 19 06:50:11 1998
--- g77-e/gcc/f/stc.c Sat Jul 25 17:14:31 1998
*************** ffestc_R1229_start (ffelexToken name, ff
*** 12799,12802 ****
--- 12799,12803 ----
/* Tell ffeexpr that sfunc def is in progress. */
ffesymbol_set_sfexpr (s, ffebld_new_any ());
+ ffebld_set_info (ffesymbol_sfexpr (s), ffeinfo_new_any ());
ffestc_parent_ok_ = TRUE;
}
*** g77-e/gcc/f/version.c.~1~ Sun Jul 19 19:56:14 1998
--- g77-e/gcc/f/version.c Sat Jul 25 17:22:57 1998
***************
*** 1 ****
! char *ffe_version_string = "0.5.24-19980718";
--- 1 ----
! char *ffe_version_string = "0.5.24-19980725";