Commit faa478b1 authored by Thomas Jahns's avatar Thomas Jahns 🤸
Browse files

Replace single letter string with character argument.

parent a02dbdad
......@@ -179,11 +179,11 @@ void gribSetValueCheck(int vcheck);
void gribExSP(int *isec0, int *isec1, int *isec2, float *fsec2, int *isec3,
float *fsec3, int *isec4, float *fsec4, int klenp, int *kgrib,
int kleng, int *kword, char *hoper, int *kret);
int kleng, int *kword, char hoper, int *kret);
void gribExDP(int *isec0, int *isec1, int *isec2, double *fsec2, int *isec3,
double *fsec3, int *isec4, double *fsec4, int klenp, int *kgrib,
int kleng, int *kword, char *hoper, int *kret);
int kleng, int *kword, char hoper, int *kret);
const char *cgribexLibraryVersion(void);
......
......@@ -1177,9 +1177,9 @@ void gprintf(const char *caller, const char *fmt, ...)
void
gribExDP(int *isec0, int *isec1, int *isec2, double *fsec2, int *isec3,
double *fsec3, int *isec4, double *fsec4, int klenp, int *kgrib,
int kleng, int *kword, char *hoper, int *kret)
int kleng, int *kword, char hoper, int *kret)
{
int yfunc = *hoper;
int yfunc = hoper;
if ( yfunc == 'D' || yfunc == 'J' || yfunc == 'R' )
gribDecode(isec0, isec1, isec2, fsec2, isec3,
......@@ -1202,13 +1202,13 @@ gribExDP(int *isec0, int *isec1, int *isec2, double *fsec2, int *isec3,
void
gribExSP(int *isec0, int *isec1, int *isec2, float *fsec2sp, int *isec3,
float *fsec3sp, int *isec4, float *fsec4sp, int klenp, int *kgrib,
int kleng, int *kword, char *hoper, int *kret)
int kleng, int *kword, char hoper, int *kret)
{
int inum, j;
double fsec2dp[1024];
double fsec3dp[2];
double *fsec4dp = NULL;
int yfunc = *hoper;
int yfunc = hoper;
if ( yfunc == 'C' )
{
......
......@@ -492,7 +492,7 @@ void cgribexDecodeHeader(int *isec0, int *isec1, int *isec2, double *fsec2,
int iret = 0, ipunp = 0, iword = 0;
gribExDP(isec0, isec1, isec2, fsec2, isec3, fsec3, isec4, fsec4,
ipunp, (int *) gribbuffer, recsize, &iword, "J", &iret);
ipunp, (int *) gribbuffer, recsize, &iword, 'J', &iret);
*lmv = 0;
......@@ -1345,12 +1345,12 @@ int cgribexDecode(unsigned char *gribbuffer, int gribsize, double *data, int gri
int izip;
long unzipsize;
double fsec2[512], fsec3[2];
char hoper[2];
char hoper;
*zip = 0;
if ( unreduced ) strcpy(hoper, "R");
else strcpy(hoper, "D");
if ( unreduced ) hoper = 'R';
else hoper = 'D';
FSEC3_MissVal = missval;
......@@ -2203,7 +2203,7 @@ size_t cgribexEncode(int varID, int levelID, int vlistID, int gridID, int zaxisI
//printf("isec4[16] %d\n", isec4[16]);
gribExDP(isec0, isec1, isec2, fsec2, isec3, fsec3, isec4, (double*) data,
datasize, (int *) gribbuffer, gribsize, &iword, "C", &iret);
datasize, (int *) gribbuffer, gribsize, &iword, 'C', &iret);
if ( iret ) Error("Problem during GRIB encode (errno = %d)!", iret);
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment