[FLASH-BUGS] Flash - Fortran90 compiler compatibility on Tru64

[Colin McNally]

Hi,
  Thanks for that patch, it's more elegant than how I hacked out those 
particular common blocks to modules. However, the comon blocks below 
still cause errors

In dBaseDeclarations.F90
common /floats/ time, dt, dtold, redshift, oldredshift
common /intgrs/ nstep, nbegin, MyPE, MasterPE, NumPEs

As far as I know they only again show up in the PARAMESH files
batchsend.F90
batchsend_dbl.F90

I replaced these with two new modules in the database, and placed the 
appropriate USE statements in everything that used them.  Please find 
the source files common_intgrs.F90 and common_floats.F90 attached.

-Colin McNally
McMaster University

Andrew Siegel wrote:

>
>On Fri, 5 Jul 2002, Colin McNally wrote:
>
>>Hi,
>>  I have had to hack out some of the FORTRAN common blocks in PARAMESH 
>>that were used by the dataBase module into common blocks to make Compaq 
>>Tru64 Fortran compile FLASH (intgrs, floats,tree,solution_cc). It is 
>>possible that my modifications have messed something up.  
>>    The issue is that when a common block is defined by Paramesh and is 
>>used in a dBase module and then a name in the common block is in the 
>>ONLY specification of a USE statement the compag compiler, for example goes:
>>
>
>Yes, this is caused by a bug on the Tru64 compiler that was supposed to be
>fixed in version 5.2. I'm not sure what the status is, but we've put
>together a quick patch that should workaround any versions that have this
>problem. You can download a trial version of the patch now from
>http://flash.uchicago.edu/~siegela/CompaqPatch.tar
>
>We are still a few weeks away from fully testing our code on a Compaq
>cluster. Until then, I can't gaurantee that this patch will solve all of
>the Compaq problems. It certainly works around the one you point out, but
>it's possible there are others. In several weeks, we will be running our
>full test suite nightly on a tru64 cluster. In the meantime, this is all
>we can offer.
>
>To run the patch, copy the .tar to your $FLASH_HOME directory. Then do
>
>tar xvf CompaqPatch.tar
>./runpatch
>
>Please let me know of any problems.
>
>regards, andrew siegel
>
>
>
>


-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: common_intgrs.F90
Url: http://flash.uchicago.edu/pipermail/flash-bugs/attachments/20020705/a4d8414a/attachment.pl 
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: common_floats.F90
Url: http://flash.uchicago.edu/pipermail/flash-bugs/attachments/20020705/a4d8414a/attachment-0001.pl