aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.9/gcc/testsuite/gfortran.dg/static_linking_1.f
blob: 099f4d48506385bf5d46bc9831702758c905fcdb (plain)
1
2
3
4
5
6
7
8
9
10
11
! { dg-do run }
! { dg-require-effective-target static_libgfortran }
! { dg-additional-sources static_linking_1.c }
! { dg-options "-static" }
!
! This testcase checks that statically linking libgfortran with C main()
! really calls the constructor function
! PR libfortran/22298
      subroutine f
        print *, "subroutine output"
      end