Wrong warnings in g77

[Martin Kahlert <martin dot kahlert at infineon dot com>]

Hi!
The snapshots of g77 seem to warn a lot about unused variables
in my prog. These variables aren't unused at all, since they are inside
named common blocks. In the following example, bar2 isn't unused,
because it could be used in other subroutines.
I would prefer, that g77 omits the warning about BAR, too, because
the common block 'name' is included in more than one subroutine and
every subroutine uses other parts of it.

      SUBROUTINE FOO
      COMMON /NAME/ BAR, BAR2
      INTEGER*4 BAR, BAR2

      BAR2 = 1
      RETURN
      END

Bye,
Martin.

PS: I see a near 30% performance boost in some parts of my prog.
    Thanks for that super work!