diff options
| author | Craig Burley <craig@jcb-sc.com> | 1999-06-28 18:43:48 +0000 |
|---|---|---|
| committer | Craig Burley <burley@gcc.gnu.org> | 1999-06-28 14:43:48 -0400 |
| commit | 687794084fbf5e44edbe8db1b2be556d3e94eb4e (patch) | |
| tree | 2881e6c1b8403dd59898128e61e6526372fe61da /gcc | |
| parent | 245d977a8ab20546f605f8051119740adfc9637f (diff) | |
| download | gcc-687794084fbf5e44edbe8db1b2be556d3e94eb4e.zip gcc-687794084fbf5e44edbe8db1b2be556d3e94eb4e.tar.gz gcc-687794084fbf5e44edbe8db1b2be556d3e94eb4e.tar.bz2 | |
Fix ICE involving -fno-f2c and COMPLEX intrinsic invocation
From-SVN: r27817
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/f/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/f/com.c | 5 | ||||
| -rw-r--r-- | gcc/f/version.c | 2 |
3 files changed, 12 insertions, 2 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index f94aa6f..1838e2d 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -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. diff --git a/gcc/f/com.c b/gcc/f/com.c index 9500956..c326fed 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -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) diff --git a/gcc/f/version.c b/gcc/f/version.c index 9b211b1..cba4229 100644 --- a/gcc/f/version.c +++ b/gcc/f/version.c @@ -1 +1 @@ -const char *ffe_version_string = "0.5.25 19990526 (prerelease)"; +const char *ffe_version_string = "0.5.25 19990628 (prerelease)"; |