gcc/testsuite/gfortran.dg/iso_c_binding_compiler_1.f90

   1 ! { dg-do link }
   2 ! The compiler_options() function is dependent on the
   3 ! command line options and thus incompatible with -fcompare-debug.
   4 ! { dg-skip-if "-fcompare-debug incompatible test" { *-*-* } { "-fcompare-debug" } { "" } } */
   5 !
   6 ! PR fortran/40569
   7 !
   8 ! Check compiler_version/compiler_options intrinsics
   9 !
  10 subroutine test()
  11   use iso_fortran_env, only: compiler_version
  12   print '(3a)', '>>',compiler_version(),'<<'
  13 end
  14
  15 use iso_fortran_env, foo => compiler_version, bar => compiler_version
  16   implicit none
  17   print *, foo()
  18   print *, bar()
  19   print '(3a)', '>',compiler_options(),'<'
  20   call test()
  21 end