gfortran 4.3.0 regressions

[Jerry DeLisle]

Tobias Burnus wrote:
> Assume:
> 
> module m
>  public :: print, write, volatile, istat
> contains
>   subroutine one
>       allocatable :: d(:)
>       volatile :: b
>       volatile c
>       print *, b
>       write(99,*) c
>       allocate(d(4),stat=istat)
>   end subroutine one
>   subroutine print(); end subroutine
>   subroutine write(); end subroutine
>   subroutine volatile(); end subroutine
> end module m
> 
> 
------snip-------
> 
> Now, please start to think!
> 
> 
> Tobias
> 

Tobias, could we possibly glean something from the context of the function that 
is calling gfc_match_variable.  By passing another flag or attribute to 
gfc_match_variable that informs us of this "context" maybe we can use that to 
determine whether to set FLAVOR_VARIABLE or FLAVOR_PROCEDURE for the symbol.  WE 
can grep for all instances calling gfc_match_variable and see if there is a 
pattern we can use.

Just trying to brainstorm a little.

Jerry