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

re PR fortran/43030 (Conditional jump or move depends on uninitialised value on eoshift_2.f90)

Browse Source 
PR fortran/43030
	* resolve.c (gfc_resolve_dim_arg): Call gfc_clear_ts.

From-SVN: r156718
This commit is contained in:
Jakub Jelinek 2010-02-11 20:47:20 +01:00 committed by Jakub Jelinek
parent f432760fec
commit a79ff094a9
2 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gcc/fortran/ChangeLog
View File

@ -1,5 +1,8 @@
2010-02-11 Jakub Jelinek <jakub@redhat.com>
PR fortran/43030
* resolve.c (gfc_resolve_dim_arg): Call gfc_clear_ts.
PR fortran/43029
* decl.c (enumerator_decl): Don't call gfc_free_enum_history
here.

1
gcc/fortran/resolve.c
View File

@ -3958,6 +3958,7 @@ gfc_resolve_dim_arg (gfc_expr *dim)
{
gfc_typespec ts;
gfc_clear_ts (&ts);
ts.type = BT_INTEGER;
ts.kind = gfc_index_integer_kind;