[Bug fortran/47030] !GCC$ Attributes do not work for COMMON variables in procedures and BLOCK DATA

[marco_atzeri at yahoo dot it]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=47030

--- Comment #7 from marco atzeri <marco_atzeri at yahoo dot it> ---
I am trying to update the draft patch of Tobias to gcc-7.3.0
the current gcc on cygwin.

The attached patch builds but does not solve the problem of

 !GCC$ attributes dllexport :: /mydata/
                               1
Error: Invalid character in name at (1)

nor 

 !GCC$ attributes dllexport :: mydata
                                    1
Warning: Unused variable ‘mydata’ declared at (1) [-Wunused-variable]


I see two possibilities:

1) the original path was missing the portion of interpreting "/mydata/" as
   valid symbol

2) my guess of "com->head->attr" for original "common_sym->attr" is wrong

and eventually both applies.

Any suggestion for solving "Error: Invalid character in name at (1)" ?