Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.
29231 Discussions

9.1.025 and char pointer CVF calling conv broken?

ipattielgc
Beginner
380 Views
I already filed this with Premier Support, but maybe I can save several hours of head scratching for others. Looks like 9.1.025 has a problem not present in 9.1.024 or any previous IVF I've used. It seems to be with character pointers that are passed to subroutines when using the CVF Calling Convention. DEFAULT works fine. I.e., the following gives a warning with CVF, but should not, near as I can tell.
The 9.1.025 will give warnings, or even abort with an "incorrect or different no of arguments" error.
program main
interface
subroutine alloc1c(carray,narray)
character(len=*), pointer :: carray(:)
integer :: narray
end subroutine alloc1c
end interface
integer :: ncbffold = 0
character(len=8), pointer :: cbffold(:)
allocate(cbffold(4))
call alloc1c(cbffold,ncbffold)
stop
end
subroutine alloc1c(carray,narray)
character(len=*), pointer :: carray(:)
integer :: narray
return
end
0 Kudos
0 Replies
Reply