diff options
| author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-02-26 18:55:32 +0000 |
|---|---|---|
| committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-02-26 18:55:32 +0000 |
| commit | 7b0d49c3df9b30c125c1d8bd512813c9e5572a14 (patch) | |
| tree | b16d4d4c74aa1208496d66ee2c01dddf68b2e7e4 /lib/sbin | |
| parent | 70d5a3fa7833801fc6ad301294eb153a05ec0721 (diff) | |
Resurrected FORTRAN_COMMON_NAME as the linux absoft compiler puts
_C in front of common block names in the symbol table.
You'll need to regenerate your fortran_name.pl files after updating with
these changes.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@350 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin')
| -rw-r--r-- | lib/sbin/CST | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/sbin/CST b/lib/sbin/CST index 383aaa0b..8a2d4f97 100644 --- a/lib/sbin/CST +++ b/lib/sbin/CST @@ -828,7 +828,7 @@ EOT open(OUT, "| perl $cctk_home/lib/sbin/c_file_processor.pl $top/config-data > CParameterStructNames.h") || die "Cannot create CParameterStructNames.h by running c_file_procesor.pl"; foreach $structure (keys %structures) { - print OUT "#define $structure FORTRAN_NAME($structures{$structure})\n"; + print OUT "#define $structure FORTRAN_COMMON_NAME($structures{$structure})\n"; } print OUT "\n"; |