12 lines
346 B
Fortran
12 lines
346 B
Fortran
! { 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
|