diff options
author | schnetter <schnetter@51d2df92-0e4f-0410-a727-bd43d766d6b6> | 2005-05-06 21:39:05 +0000 |
---|---|---|
committer | schnetter <schnetter@51d2df92-0e4f-0410-a727-bd43d766d6b6> | 2005-05-06 21:39:05 +0000 |
commit | 60ddb089f23c64606d9343d12842120c13403a6e (patch) | |
tree | c3cf4de881159bec5edc72473ddf9a9eddb8d73b | |
parent | 028a8e35dda9de49d57af2f8f713ac45936becae (diff) |
Correct misspelled prodecure name.
Do not declare some procedures that have no Fortran wrappers in the
flesh.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Fortran/trunk@30 51d2df92-0e4f-0410-a727-bd43d766d6b6
-rw-r--r-- | src/cctk_Reduction.F90 | 2 | ||||
-rw-r--r-- | src/cctk_WarnLevel.F90 | 8 |
2 files changed, 6 insertions, 4 deletions
diff --git a/src/cctk_Reduction.F90 b/src/cctk_Reduction.F90 index 6e5cda9..b56a91d 100644 --- a/src/cctk_Reduction.F90 +++ b/src/cctk_Reduction.F90 @@ -227,7 +227,7 @@ module cctk_Reduction external CCTK_Reduce external CCTK_ReduceLocalScalar external CCTK_ReduceLocalArray1D - external CCTK_ReduceLocScalarn + external CCTK_ReduceLocScalar external CCTK_ReduceLocArrayToArray1D external CCTK_ReduceLocArrayToArray2D external CCTK_ReduceLocArrayToArray3D diff --git a/src/cctk_WarnLevel.F90 b/src/cctk_WarnLevel.F90 index 80aab16..623224c 100644 --- a/src/cctk_WarnLevel.F90 +++ b/src/cctk_WarnLevel.F90 @@ -39,8 +39,10 @@ module cctk_WarnLevel end interface - external CCTK_VWarn - external CCTK_VParamWarn - external CCTK_VInfo + ! Do not declare these, because some compilers insist on a + ! definition once they have seen an external declaration: +!!$ external CCTK_VWarn +!!$ external CCTK_VParamWarn +!!$ external CCTK_VInfo end module cctk_WarnLevel |