XLF data initialization of common blocks

[Jim Ray]

I'm trying to port some poorly written fortran code to the RIOS box (
IBM RS6000 model 540 ), and ran into a "slight" problem.

It appears that the xlf compiler will not allow me to initialize ( via
the data statement ) a named common block withen a subroutine other
than block data.

At least 6 months ago I talked with someone withen IBM that mentioned
this and stated that this only refers to blank common not named common
blocks.

Since the code ( several hundred thousand lines ) would be practically
impossible to convert -- does ANYONE KNOW OF ANY hidden or not hidden
option that would allow me to do this?  Is it reliable?  Known problems?

Thanks,
-- 
Jim Ray                                Harris Semiconductor
Internet:  jdr at semi.harris.com         PO Box 883   MS 62B-022
Phone:     (407) 729-5059              Melbourne, FL  32901