"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

---