! { dg-do compile { target { { i?86-*-* x86_64-*-* } && ia32 } } } | |
! | |
! PR fortran/34112 | |
! | |
! Check for calling convention consitency | |
! in procedure-pointer assignments. | |
! | |
subroutine test() ! { dg-error "fastcall and stdcall attributes are not compatible" } | |
cGCC$ attributes stdcall, fastcall::test | |
end subroutine test |