Bounds remapping for pointer (error # 6731)

[abhimodak]

May be this is a known issue ...

The program below does not compile. For the first three cases (see below), the compiler gives the bounds correctly; however there is a problem when pointer bounds are remapped. Compilation is aborted with error # 6731: Object is not a pointer object.

I am using 11.1.038 on WinXP64 with VS2005.

Abhi

-----------

Program Test_PointerPartition

!
! Purpose: Test bounds remapping for pointers.
!

Implicit None

Real(8), Target :: A(11:20)

Real(8), Pointer :: B(:)

!
!##########
!

B => A(11:20)
print *, LBOUND(B), UBOUND(B)

B => A
print *, LBOUND(B), UBOUND(B)

B => A(:)
print *, LBOUND(B), UBOUND(B)

! This remapping fails with 11.1.038
B(51:) => A(11:20)
print *, LBOUND(B), UBOUND(B)

End Program Test_PointerPartition

[Kevin_D_Intel]

I did not find any existing report of this. I forwarded to the Development team and will update the post when I know more.

(Internal tracking id: DPD200138689)

(Resolution Update on 06/11/2011): This defect is fixed in the Intel Fortran Composer XE 2011 initial release.

[Kevin_D_Intel]

Pardon the delayed update. This defect is fixed in the Intel Fortran Composer XE 2011 initial release.

[ILIAS_T_]

I experience the same problem. Is there any way to go around this?

Thanks in advanced.

[Steven_L_Intel1]

Ilias, it is likely you have a different problem, unless you are using a four-year-old compiler. Please start a new thread and attach a copy of a test program that demonstrates the problem and tell us which exact compiler version you are using and which compiler options you used.

[ILIAS_T_]

I am using an even older version :). Version 9.1.3250.2005. So the problem is the same as in the first post. I do not use any special compiler flag.

[Steven_L_Intel1]

You need to update the compiler. It was a compiler bug that has been fixed for a couple of years at least. Version 9.1 is going on six years old.