diff options
author | tradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668> | 2004-01-22 13:31:14 +0000 |
---|---|---|
committer | tradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668> | 2004-01-22 13:31:14 +0000 |
commit | 8324407bddd5fc1a2bfc5bf53a09000511904c01 (patch) | |
tree | fa9760780f36cb191013f459c17f50a261b8dd81 | |
parent | 996d4033c3eb0f7375f9845d9d24ab86b5315ebc (diff) |
Renamed some aliased hyperslab functions to comply with the maximum length
for names of Fortran routines (31 characters):
Hyperslab_DefineGlobalMappingByPhys -> Hyperslab_GlobalMappingByPhys
Hyperslab_DefineGlobalMappingByIndex -> Hyperslab_GlobalMappingByIndex
Hyperslab_DefineLocalMappingByPhys -> Hyperslab_LocalMappingByPhys
Hyperslab_DefineLocalMappingByIndex -> Hyperslab_LocalMappingByIndex
Also renamed the providing functions accordingly.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOHDF5Util/trunk@105 7842ec3a-9562-4be5-9c5b-06ba18f2b668
-rw-r--r-- | interface.ccl | 40 | ||||
-rw-r--r-- | src/DumpVar.c | 22 |
2 files changed, 31 insertions, 31 deletions
diff --git a/interface.ccl b/interface.ccl index d831c37..39651db 100644 --- a/interface.ccl +++ b/interface.ccl @@ -15,28 +15,28 @@ CCTK_INT FUNCTION \ CCTK_POINTER OUT hdata) CCTK_INT FUNCTION \ - Hyperslab_DefineLocalMappingByIndex (CCTK_POINTER_TO_CONST IN cctkGH, \ - CCTK_INT IN vindex, \ - CCTK_INT IN hdim, \ - CCTK_INT ARRAY IN direction, \ - CCTK_INT ARRAY IN origin, \ - CCTK_INT ARRAY IN extent, \ - CCTK_INT ARRAY IN downsample, \ - CCTK_INT IN table_handle, \ - CCTK_INT CCTK_FPOINTER IN \ - conversion_fn (CCTK_INT IN nelems, \ - CCTK_INT IN src_stride,\ - CCTK_INT IN dst_stride,\ - CCTK_INT IN src_type, \ - CCTK_INT IN dst_type, \ - CCTK_POINTER_TO_CONST IN from, \ - CCTK_POINTER IN to), \ - CCTK_INT ARRAY OUT hsize_local, \ - CCTK_INT ARRAY OUT hsize_global, \ - CCTK_INT ARRAY OUT hoffset_global) + Hyperslab_LocalMappingByIndex (CCTK_POINTER_TO_CONST IN cctkGH, \ + CCTK_INT IN vindex, \ + CCTK_INT IN hdim, \ + CCTK_INT ARRAY IN direction, \ + CCTK_INT ARRAY IN origin, \ + CCTK_INT ARRAY IN extent, \ + CCTK_INT ARRAY IN downsample, \ + CCTK_INT IN table_handle, \ + CCTK_INT CCTK_FPOINTER IN \ + conversion_fn (CCTK_INT IN nelems, \ + CCTK_INT IN src_stride,\ + CCTK_INT IN dst_stride,\ + CCTK_INT IN src_type, \ + CCTK_INT IN dst_type, \ + CCTK_POINTER_TO_CONST IN from, \ + CCTK_POINTER IN to), \ + CCTK_INT ARRAY OUT hsize_local, \ + CCTK_INT ARRAY OUT hsize_global, \ + CCTK_INT ARRAY OUT hoffset_global) CCTK_INT FUNCTION Hyperslab_FreeMapping (CCTK_INT IN mapping_handle) USES FUNCTION Hyperslab_Get -USES FUNCTION Hyperslab_DefineLocalMappingByIndex +USES FUNCTION Hyperslab_LocalMappingByIndex USES FUNCTION Hyperslab_FreeMapping diff --git a/src/DumpVar.c b/src/DumpVar.c index 56a50ef..f06bcb5 100644 --- a/src/DumpVar.c +++ b/src/DumpVar.c @@ -268,7 +268,7 @@ static int WriteGS (const cGH *GH, const ioRequest *request, const char *name, Writes a grid array into a HDF5 file. @enddesc - @calls Hyperslab_DefineLocalMappingByIndex + @calls Hyperslab_LocalMappingByIndex Hyperslab_FreeMapping Hyperslab_Get WriteData @@ -330,16 +330,16 @@ static int WriteGA (const cGH *GH, const ioRequest *request, const char *name, } } - mapping = Hyperslab_DefineLocalMappingByIndex (GH, request->vindex, - request->hdim, - request->direction, - request->origin, - request->extent, - request->downsample, - table, NULL, - request->hsize_chunk, - request->hsize, - request->hoffset); + mapping = Hyperslab_LocalMappingByIndex (GH, request->vindex, + request->hdim, + request->direction, + request->origin, + request->extent, + request->downsample, + table, NULL, + request->hsize_chunk, + request->hsize, + request->hoffset); if (table >= 0) { Util_TableDestroy (table); |