From 0b299cd98f8815bdae02b07f3d993a06d8e5d62b Mon Sep 17 00:00:00 2001 From: tradke Date: Thu, 22 Jan 2004 13:31:14 +0000 Subject: 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/CactusIO/IOJpeg/trunk@91 eff87b29-5268-4891-90a3-a07138403961 --- src/Write.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src') diff --git a/src/Write.c b/src/Write.c index d23e3ee..3c9cabe 100644 --- a/src/Write.c +++ b/src/Write.c @@ -37,7 +37,7 @@ static void WriteData (const cGH *GH, int vindex, const char *alias, int dim, @desc Writes the slices of a variable into separate Jpeg files. @enddesc - @calls Hyperslab_DefineGlobalMappingByIndex + @calls Hyperslab_GlobalMappingByIndex Hyperslab_FreeMapping Hyperslab_GetList OpenFile @@ -154,9 +154,9 @@ int IOJpeg_Write (const cGH *GH, CCTK_INT vindex, const char *alias) memset (direction, 0, sizeof (direction)); direction[dir_i] = direction[gdata.dim + dir_j] = 1; - mapping = Hyperslab_DefineGlobalMappingByIndex (GH, vindex, 2, - direction, origin, extent, - NULL, -1, NULL, hsize); + mapping = Hyperslab_GlobalMappingByIndex (GH, vindex, 2, + direction, origin, extent, + NULL, -1, NULL, hsize); if (mapping < 0) { CCTK_VWarn (1, __LINE__, __FILE__, CCTK_THORNSTRING, -- cgit v1.2.3