Auto-outlining chokes on read 5, x(i)%test

Auto-outlining chokes on read 5, x(i)%test

I have some outlining troubles in a big project, which I reduced to the example provided in the screenshots that I pasted in Auto_Outlining.png.

Basically, the outlining fails for the statement read 5, x(i)%test.

It works properly for the statements write 5, x(i)%test; read 5, x%test; read 5,x(i).

Is this a known problem? Is there a solution? Thanks for answering.

AttachmentSize
Downloadimage/png Auto_Outlining.png34.85 KB
4 posts / 0 new
Last post
For more complete information about compiler optimizations, see our Optimization Notice.

It's not that simple - I can get the outlining to not outline the DO with the source in your fourth example. (I do wish, though, that you had attached the actual sources - would have saved me some time retyping them.) I will pass this on to the developers and ask them to investigate.

Steve - Intel Developer Support

Thanks for your rapid response, and apologies for not including my source. Ironically, the source was in my mail originally, but I could not describe the problem in words, so I erased the source and added the screenshots. Anyway, I noticed that my message is sparse on more detailed information.
I am using Intel(R) Visual Fortran Composer XE 2011 Update 9 Integration for Microsoft Visual Studio* 2010, 12.1.3526.2010.
The About Microsoft Visual Studio window provided more information, which I pasted below for your convenience.
Let me know if I can provide more information.

Microsoft Visual Studio 2010
Version 10.0.40219.1 SP1Rel
Microsoft .NET Framework
Version 4.0.30319 SP1Rel

Installed Version: Professional

Microsoft Visual Basic 2010 01018-532-2002181-70888
Microsoft Visual Basic 2010

Microsoft Visual C# 2010 01018-532-2002181-70888
Microsoft Visual C# 2010

Microsoft Visual C++ 2010 01018-532-2002181-70888
Microsoft Visual C++ 2010

Microsoft Visual Studio 2010 Team Explorer 01018-532-2002181-70888
Microsoft Visual Studio 2010 Team Explorer

AnkhSVN - Subversion Support for Visual Studio 2.4.11610.27
AnkhSVN - Subversion Support for Visual Studio 2.4.11610.27
* Ankh.Package 2.4.11610.27
* Subversion 1.7.6 via SharpSvn 1.7006.2206.13750

SharpSvn is linked to: Apr 1.4.6, Apr-util 1.4.2, Cyrus Sasl 2.1.23, Neon 0.29.6, OpenSSL 1.0.1c 10 May 2012, serf 1.1.0, SQLite 3.7.12.1, Subversion 1.7.6-SharpSvn-1.7.6, ZLib 1.2.7
SharpSvn is optionally linked to: Berkeley DB 4.4.20, SharpPlink 1.7006.2206.13750

CommandingImage 1.0
This package adds the ability to change command images that was not supported in VS 2010 RTM.

Crystal Reports Templates for Microsoft Visual Studio 2010
Crystal Reports Templates for Microsoft Visual Studio 2010

Hotfix for Microsoft Visual Studio 2010 Professional - ENU (KB2522890) KB2522890
This hotfix is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this hotfix will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/2522890.

Hotfix for Microsoft Visual Studio 2010 Professional - ENU (KB2529927) KB2529927
This hotfix is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this hotfix will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/2529927.

Hotfix for Microsoft Visual Studio 2010 Professional - ENU (KB2542054) KB2542054
This hotfix is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this hotfix will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/2542054.

Hotfix for Microsoft Visual Studio 2010 Professional - ENU (KB2548139) KB2548139
This hotfix is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this hotfix will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/2548139.

Hotfix for Microsoft Visual Studio 2010 Professional - ENU (KB2549864) KB2549864
This hotfix is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this hotfix will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/2549864.

Hotfix for Microsoft Visual Studio 2010 Professional - ENU (KB2635973) KB2635973
This hotfix is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this hotfix will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/2635973.

Intel(R) Visual Fortran Package ID: w_fcompxe_2011.9.300
Intel(R) Visual Fortran Composer XE 2011 Update 9 Integration for Microsoft Visual Studio* 2010, 12.1.3526.2010, Copyright (C) 2002-2012 Intel Corporation
* Other names and brands may be claimed as the property of others.

Microsoft Visual Studio 2010 Professional - ENU Service Pack 1 (KB983509) KB983509
This service pack is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this service pack will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/983509.

Security Update for Microsoft Visual Studio 2010 Professional - ENU (KB2645410) KB2645410
This security update is for Microsoft Visual Studio 2010 Professional - ENU.
If you later install a more recent service pack, this security update will be uninstalled automatically.
For more information, visit http://support.microsoft.com/kb/2645410.

I found another clue to this issue. I added the dummy integer j to the code, and set it to zero, see the line j=(0) in the code below.
The outlining gets correct if the closing parenthesis is present. j=0+(0) has the correct outlining too, whereas j=0 and j=(0)+0 confuse the automatic outlining.


module outlining
type type_x

  real(8) test

end type
contains
  subroutine test()

    type (type_x) x(i)

    integer(4) i,j

    do i=1,10

      read 5, x(i)%test

      j = (0)

    end do

  end subroutine
end module

Leave a Comment

Please sign in to add a comment. Not a member? Join today