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

turned on some commented out test code

Browse Source
This commit is contained in:
Ed Hartnett 2017-11-10 05:01:32 -07:00
parent a9dde277d7
commit cb32451cf5
1 changed files with 12 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
nc_test4/tst_large.c
View File

@ -2,8 +2,9 @@
Copyright 2005 University Corporation for Atmospheric Research/Unidata
See COPYRIGHT file for conditions of use.
Test netcdf-4 variables.
$Id: tst_large.c,v 1.5 2009/05/18 10:26:24 ed Exp $
Test netcdf-4 large file fill values.
Ed Hartnett.
*/
#include <nc_tests.h>
@ -16,8 +17,6 @@
#define DIM1 2048
#define DIM2 2097153 /* DIM1*DIM2*sizeof(char) > 2**32 */
int
main(int argc, char **argv)
{
@ -49,14 +48,13 @@ main(int argc, char **argv)
if (nc_close(ncid)) ERR;
/* Reopen and read a value. */
/* if (nc_open(FILE_NAME, NC_NOWRITE, &ncid)) ERR; */
/* if (nc_inq_varid(ncid, "var", &varid)) ERR; */
/* if (nc_get_var1_schar(ncid, varid, index, &char_val_in)) ERR; */
/* if (char_val_in != 99) /\* see above, the value written when start[0]==0, j==0 *\/ */
/* ERR; */
/* if (nc_close(ncid)) ERR; */
if (nc_open(FILE_NAME, NC_NOWRITE, &ncid)) ERR;
if (nc_inq_varid(ncid, "var", &varid)) ERR;
if (nc_get_var1_schar(ncid, varid, index, &char_val_in)) ERR;
if (char_val_in != 99) /* see above, the value written when start[0]==0, j==0 */
ERR;
if (nc_close(ncid)) ERR;
}
SUMMARIZE_ERR;
FINAL_RESULTS;
}