gcc/testsuite/gfortran.dg/compiler-directive_2.f

   1 ! { dg-do compile { target i?86-*-* x86_64-*-* } }
   2 ! { dg-require-effective-target ilp32 }
   3 !
   4 ! PR fortran/34112
   5 !
   6 ! Check for calling convention consitency
   7 ! in procedure-pointer assignments.
   8 !
   9       subroutine test() ! { dg-error "fastcall and stdcall attributes are not compatible" }
  10 cGCC$ attributes stdcall, fastcall::test
  11       end subroutine test