Fix ICE involving -fno-f2c and COMPLEX intrinsic invocation
From-SVN: r27817
This commit is contained in:
parent
245d977a8a
commit
687794084f
@ -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>
|
||||
|
||||
* bugs.texi, news.texi: Doc upgrade to netlib libf2c as of today.
|
||||
|
@ -13068,7 +13068,10 @@ ffecom_prepare_expr_ (ffebld expr, ffebld dest UNUSED)
|
||||
|
||||
s = ffebld_symter (ffebld_left (expr));
|
||||
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;
|
||||
}
|
||||
else if (ffebld_op (expr) == FFEBLD_opPOWER)
|
||||
|
@ -1 +1 @@
|
||||
const char *ffe_version_string = "0.5.25 19990526 (prerelease)";
|
||||
const char *ffe_version_string = "0.5.25 19990628 (prerelease)";
|
||||
|
Loading…
Reference in New Issue
Block a user