"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "libsrc/fort-lib.c" between
netcdf-fortran-4.4.4.tar.gz and netcdf-fortran-4.4.5.tar.gz

About: NetCDF (network Common Data Form) is a set of software libraries and machine-independent data formats that support the creation, access, and sharing of array-oriented scientific data (Fortran library).

fort-lib.c  (netcdf-fortran-4.4.4):fort-lib.c  (netcdf-fortran-4.4.5)
skipping to change at line 150 skipping to change at line 150
/* /*
* Convert a FORTRAN mapping vector into a C mapping vector. * Convert a FORTRAN mapping vector into a C mapping vector.
*/ */
EXTERNL ptrdiff_t * EXTERNL ptrdiff_t *
f2c_maps(int ncid, int varid, const NF_INTEGER* fmaps, ptrdiff_t* cmaps) f2c_maps(int ncid, int varid, const NF_INTEGER* fmaps, ptrdiff_t* cmaps)
{ {
return f2c_strides(ncid, varid, fmaps, cmaps); return f2c_strides(ncid, varid, fmaps, cmaps);
} }
#if 0
#ifdef USE_NETCDF4 #ifdef USE_NETCDF4
/* These appear to only be defined in netcdf-4*/ /* These appear to only be defined in netcdf-4*/
/* Get the varids for a fortran function (i.e. add 1 to each /* Get the varids for a fortran function (i.e. add 1 to each
* varid.) */ * varid.) */
EXTERNL int EXTERNL int
nc_inq_varids_f(int ncid, int *nvars, int *fvarids) nc_inq_varids_f(int ncid, int *nvars, int *fvarids)
{ {
int *varids, nvars1; int *varids, nvars1;
int i, ret = NC_NOERR; int i, ret = NC_NOERR;
skipping to change at line 274 skipping to change at line 275
temp = *f; temp = *f;
*f = *b; *f = *b;
*b = temp; *b = temp;
} }
} }
return NC_NOERR; return NC_NOERR;
} }
#endif /*USE_NETCDF4*/ #endif /*USE_NETCDF4*/
#endif
 End of changes. 2 change blocks. 
0 lines changed or deleted 1 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)