mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-10 13:31:04 +08:00
Code Issues Packages Projects Releases Wiki Activity

expr.c (ffeexpr_token_arguments_): Make sure outer exprstack isn't null.

Browse Source 
* expr.c (ffeexpr_token_arguments_): Make sure
	outer exprstack isn't null.

From-SVN: r18190
This commit is contained in:
Craig Burley 1998-02-22 14:39:08 -05:00 committed by Jeff Law
parent a52ad720f4
commit b50fa387cb
3 changed files with 11 additions and 0 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 @@
Fri Feb 20 12:45:53 1998 Craig Burley <burley@gnu.org>
* expr.c (ffeexpr_token_arguments_): Make sure
outer exprstack isn't null.
Fri Feb 20 10:11:20 1998 Craig Burley <burley@gnu.org>
* Make-lang.in (f77.install-info): Fix typo in script.

1
gcc/f/expr.c
View File

@ -18540,6 +18540,7 @@ ffeexpr_token_arguments_ (ffelexToken ft, ffebld expr, ffelexToken t)
only if next token isn't the close-paren for REAL(me). */
if ((ffeexpr_stack_->previous != NULL)
&& (ffeexpr_stack_->previous->exprstack != NULL)
&& (ffeexpr_stack_->previous->exprstack->type == FFEEXPR_exprtypeOPERAND_)
&& ((reduced = ffeexpr_stack_->previous->exprstack->u.operand) != NULL)
&& (ffebld_op (reduced) == FFEBLD_opSYMTER)

5
gcc/f/news.texi
View File

@ -27,6 +27,10 @@ involve a combination of these elements.
@heading In 0.5.22:
@itemize @bullet
@item
Fix a compiler crash on statements such as
@samp{PRINT *, (REAL(Z(I)),I=1,2)}, where
@samp{Z} is @code{DOUBLE COMPLEX}.
@item
Improve diagnostic messages from @code{libf2c}
so it is more likely that the printing of the
@ -47,6 +51,7 @@ is a constant.
This provides a cleaner run-time diagnostic as provided
by @code{libf2c} for statements like @samp{PRINT '(I1', 42}.
@item
Fix @code{SIGNAL} intrinsic so it offers portable
support for 64-bit systems (such as Digital Alphas
running GNU/Linux).