Commit aa622bf1 by Tobias Burnus

Add file forgotten in commit Rev. 162500

2010-07-24  Tobias Burnus  <burnus@net-b.de>

        PR fortran/40011
        * gfortran.dg/whole_file_21.f90: New.

From-SVN: r162531
parent 223a9d64
! { dg-do link }
! PR fortran/40011
!
! Contributed by Joost VandeVondele
!
!
! Before no "one" function was generated with -fwhole-file.
!
!
SUBROUTINE one ( )
END SUBROUTINE one
SUBROUTINE two ( )
END SUBROUTINE two
MODULE mod
CONTAINS
SUBROUTINE three ( )
CALL two ( )
END SUBROUTINE three
SUBROUTINE four ( )
CALL one ( )
END SUBROUTINE four
END MODULE mod
END
! { dg-final { cleanup-modules "m" } }
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment