mirror/netcdf-c
2
0
Fork 0
mirror of https://github.com/Unidata/netcdf-c.git synced 2025-03-01 17:06:03 +08:00
Code Issues Packages Projects Releases Wiki Activity

switched to vara functions in 3D test

Browse Source
This commit is contained in:
Edward Hartnett 2020-02-12 08:17:35 -07:00
parent fe96b6a3e5
commit 6e316f44a6
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
nc_test4/tst_unlim_vars.c
View File

@ -208,7 +208,7 @@ main(int argc, char **argv)
int ncid, varid, dimid[NDIM3];
int data = TEST_VAL_42;
int data_in;
size_t index[NDIM3] = {1, 1, 1};
size_t start[NDIM3] = {1, 1, 1}, count[NDIM3] = {1, 1, 1};
char name_in[NC_MAX_NAME + 1];
size_t len_in;
@ -233,16 +233,16 @@ main(int argc, char **argv)
/* Reopen the file and add data. */
if (nc_open(FILE_NAME, NC_WRITE, &ncid)) ERR;
if (nc_put_var1_int(ncid, 0, index, &data)) ERR;
if (nc_put_vara_int(ncid, 0, start, count, &data)) ERR;
if (nc_inq_dim(ncid, 0, NULL, &len_in)) ERR;
if (len_in != 2) ERR;
if (nc_inq_dim(ncid, 1, NULL, &len_in)) ERR;
if (len_in != 2) ERR;
if (nc_inq_dim(ncid, 2, NULL, &len_in)) ERR;
if (len_in != 2) ERR;
if (nc_get_var1_int(ncid, 0, index, &data_in)) ERR;
if (nc_get_vara_int(ncid, 0, start, count, &data_in)) ERR;
if (data_in != data) ERR;
if (nc_get_var1_int(ncid, 1, index, &data_in)) ERR;
if (nc_get_vara_int(ncid, 1, start, count, &data_in)) ERR;
if (data_in != NC_FILL_INT) ERR;
if (nc_close(ncid)) ERR;