MatCat.OpenSource/8sa1-gcc
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fix ICE involving -fno-f2c and COMPLEX intrinsic invocation

Browse Source 
From-SVN: r27817
This commit is contained in:
Craig Burley 1999-06-28 18:43:48 +00:00 committed by Craig Burley
parent 245d977a8a
commit 687794084f
3 changed files with 12 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 @@
Mon Jun 28 10:43:11 1999 Craig Burley <craig@jcb-sc.com>
* com.c (ffecom_prepare_expr_): A COMPLEX intrinsic needs
a temp even if -fno-f2c.
* version.c: Bump version.
Mon Jun 28 21:31:35 1999 Craig Burley <craig@jcb-sc.com> Mon Jun 28 21:31:35 1999 Craig Burley <craig@jcb-sc.com>
* bugs.texi, news.texi: Doc upgrade to netlib libf2c as of today. * bugs.texi, news.texi: Doc upgrade to netlib libf2c as of today.

5
gcc/f/com.c
View File

@ -13068,7 +13068,10 @@ ffecom_prepare_expr_ (ffebld expr, ffebld dest UNUSED)
s = ffebld_symter (ffebld_left (expr)); s = ffebld_symter (ffebld_left (expr));
if (ffesymbol_where (s) == FFEINFO_whereCONSTANT if (ffesymbol_where (s) == FFEINFO_whereCONSTANT
|| ! ffesymbol_is_f2c (s)) || (ffesymbol_where (s) != FFEINFO_whereINTRINSIC
&& ! ffesymbol_is_f2c (s))
|| (ffesymbol_where (s) == FFEINFO_whereINTRINSIC
&& ! ffe_is_f2c_library ()))
break; break;
} }
else if (ffebld_op (expr) == FFEBLD_opPOWER) else if (ffebld_op (expr) == FFEBLD_opPOWER)

2
gcc/f/version.c
View File

@ -1 +1 @@
const char *ffe_version_string = "0.5.25 19990526 (prerelease)"; const char *ffe_version_string = "0.5.25 19990628 (prerelease)";