1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
 ss_file_t *
 ss_file_create(const char *name,        /* Name of file to be created. */
                unsigned flags,          /* HDF5-style file access flags (see ss_file_open()). */
                ss_prop_t *props         /* Optional file property list (see File Properties). */
                )
 {
     SS_ENTER(ss_file_create, ss_file_tP);
     ss_file_t *file = NULL;

     flags |= H5F_ACC_RDWR | H5F_ACC_TRUNC | H5F_ACC_CREAT;
     if (NULL==(file=ss_file_open(NULL, name, flags, props))) SS_ERROR(FAILED);

  SS_CLEANUP:
     SS_LEAVE(file);
 }