[Patch, Fortran] PR32359 OpenMP threadprivate: SAVE is implied by explicit initialization

[Daniel Franke]

On Saturday 16 June 2007 16:36:33 Tobias Burnus wrote:
> However, your patch missed the following use of the "SAVE" statement:
>    integer :: y
>    save

Thanks for catching that.


> How about something like the attached patch?

Looks good to me :)


> The testsuites libgomp & gfortran have no failures but:
> gfortran.dg/module_md5_1.f90; after glancing at module.c I still don't
> quite understand why, but I get the MD5 sum:
> MD5:2acedc3d584fad6aae6248078b02aa38 instead of
> MD5:18a257e13c90e3872b7b9400c2fc6e4b. 

That's the implicit SAVE of 

  module foo
    integer(kind=4), parameter :: pi = 3_4
  end module foo

propagated to foo.mod:

  3 'pi' 'foo' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN SAVE) (

The SAVE at the end of the line was set to UNKNOWN before.


Regards
	Daniel