[Bug fortran/50923] [4.4/4.5/4.6/4.7 Regression] No warning if function return value is not set

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=50923

--- Comment #4 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-12-11 
21:37:58 UTC ---
Author: burnus
Date: Sun Dec 11 21:37:55 2011
New Revision: 182213

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=182213
Log:
2011-12-11  Tobias Burnus  <bur...@net-b.de>

        PR fortran/50923
        * trans-decl.c (generate_local_decl): Set TREE_NO_WARNING only
        if the front end has printed a warning.
        (gfc_generate_function_code): Fix unset-result warning.

2011-12-11  Tobias Burnus  <bur...@net-b.de>

        PR fortran/50923
        * gfortran.dg/warn_function_without_result_2.f90: New.


Added:
   
branches/gcc-4_6-branch/gcc/testsuite/gfortran.dg/warn_function_without_result_2.f90
Modified:
    branches/gcc-4_6-branch/gcc/fortran/ChangeLog
    branches/gcc-4_6-branch/gcc/fortran/trans-decl.c
    branches/gcc-4_6-branch/gcc/testsuite/ChangeLog