BUG: FOR3199 Error in Host Association of Internal Variable

MORE INFORMATION

In the following sample code, the variable x is declared after the statement function that uses it. Reversing the declarations corrects the problem. That is, explicitly declaring your internal procedure variables before using them in a statement function works around the problem.

Sample Code to Illustrate Problem and Workaround

! Compile options needed: none

      program test
          integer x
      contains
          subroutine a()
          real b, c
! comment the following line for workaround
          b(x) = real(x)
          integer x
! uncomment the following line for workaround
!          b(x) = real(x)
          c = b(x)
          end subroutine
      end