[Fortran, patch] Fix missing parts of host-/use-associated VOLATILE (PR30522)

[Tobias Burnus]

:ADDPATCH fortran:

The following patch fixes the following issue with host-/use-associated
VOLATILE:

Now a proper error is given for:

module A
   real :: v
module A

module B
  use :: A
  volatile :: v
  volatile :: v ! ERROR, but was accepted
end module B

While the following is now accepted:

module test
  real, volatile :: A
contains
  subroutine sub
    volatile :: A ! VALID, but was rejected
  end subroutine sub
end module test


I decided to fill a new PR30733 about the missed optimization:
Currently, a variable is marked VOLATILE everywhere. It should only
be VOLATILE in the scope where it has be marked as such.
But I don't expect many program to profit from this optimization.

Bootstapped and regression tested on x86_64-unknown-linux-gnu.

Ok for the trunk? (It is not in any branch, except in fortran-experiments.)

Tobias

-------------- next part --------------
A non-text attachment was scrubbed...
Name: volatile-use.diff
Type: text/x-patch
Size: 7318 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20070208/08af62c1/attachment.bin>