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