Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!sun-barr!lll-winken!elroy.jpl.nasa.gov!ncar!gatech!prism!mailer.cc.fsu.edu!uflorida!mlb.semi.harris.com!sloth.mlb.semi.harris.com!jdr
From: jdr@sloth.mlb.semi.harris.com (Jim Ray)
Newsgroups: comp.sys.ibm.pc.rt
Subject: data initialization of common blocks
Keywords: fortran, data, common block
Message-ID: <1991Feb28.184646.18216@mlb.semi.harris.com>
Date: 28 Feb 91 18:46:46 GMT
Sender: news@mlb.semi.harris.com
Organization: Harris Semiconductor, Melbourne FL
Lines: 21
Nntp-Posting-Host: sloth.mlb.semi.harris.com

I'm trying to port some poorly written software 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?

Thanks,

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