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