12 lines
353 B
Fortran
12 lines
353 B
Fortran
! { dg-do compile { target i?86-*-* x86_64-*-* } }
|
|
! { dg-require-effective-target ilp32 }
|
|
!
|
|
! 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
|