[Patch, fortran] PR31154 and PR31229 - use associated and imported function kind parameters

[Craig Powers]

Tobias Burnus wrote:
> Craig Powers wrote:
> 
>>Tobias Burnus wrote:
>>
>>>module mod1
>>>  integer, parameter :: r8 = kind(0d0)
>>>end module mod1
>>>
>>>real(r8) function func2()
>>>  use mod1, only: r8
>>>  func2 = 0.0_r8
>>>end function func2
>>
>>If I remember and understand recent discussion of this point on
>>comp.lang.fortran correctly, it was concluded that this usage is
>>nonstandard.
> 
> 
> Well, it is accepted by several compilers (g95, ifort, NAG f95) and if I
> understood the discussion correctly, only the following is invalid
> (PARAMETER defined later):

Quite right.  I did not remember correctly exactly which usage was 
disallowed.