diff options
-rw-r--r-- | src/H5Fefc.c | 2 | ||||
-rw-r--r-- | src/H5Lexternal.c | 3 | ||||
-rw-r--r-- | src/H5private.h | 6 |
3 files changed, 5 insertions, 6 deletions
diff --git a/src/H5Fefc.c b/src/H5Fefc.c index eebf143..a0c204e 100644 --- a/src/H5Fefc.c +++ b/src/H5Fefc.c @@ -147,7 +147,7 @@ H5F_efc_open(H5F_t *parent, const char *name, unsigned flags, hid_t fcpl_id, H5F_efc_t *efc = NULL; /* External file cache for parent file */ H5F_efc_ent_t *ent = NULL; /* Entry for target file in efc */ hbool_t open_file = FALSE; /* Whether ent->file needs to be closed in case of error */ - H5F_t *ret_value; /* Return value */ + H5F_t *ret_value = NULL; /* Return value */ FUNC_ENTER_NOAPI_NOINIT(H5F_efc_open) diff --git a/src/H5Lexternal.c b/src/H5Lexternal.c index 74ef46b..02213d1 100644 --- a/src/H5Lexternal.c +++ b/src/H5Lexternal.c @@ -146,10 +146,9 @@ H5L_build_name(char *prefix, char *file_name, char **full_name/*out*/) /* Copy the prefix into the buffer */ HDstrcpy(*full_name, prefix); -#ifndef H5_VMS + if (!CHECK_DELIMITER(prefix[prefix_len-1])) HDstrcat(*full_name, DIR_SEPS); -#endif /* Add the external link's filename to the prefix supplied */ HDstrcat(*full_name, file_name); diff --git a/src/H5private.h b/src/H5private.h index b465ff6..09df6ac 100644 --- a/src/H5private.h +++ b/src/H5private.h @@ -1469,13 +1469,13 @@ extern char *strdup(const char *s); /* OpenVMS pathname: <disk name>$<partition>:[path]<file name> * i.g. SYS$SYSUSERS:[LU.HDF5.SRC]H5system.c */ -#define DIR_SEPC '.' -#define DIR_SEPS "." +#define DIR_SEPC ']' +#define DIR_SEPS "]" #define CHECK_DELIMITER(SS) (SS == DIR_SEPC) #define CHECK_ABSOLUTE(NAME) (strrchr(NAME, ':') && strrchr(NAME, '[')) #define CHECK_ABS_DRIVE(NAME) (0) #define CHECK_ABS_PATH(NAME) (0) -#define GET_LAST_DELIMITER(NAME, ptr) ptr = strrchr(NAME, ']'); +#define GET_LAST_DELIMITER(NAME, ptr) ptr = strrchr(NAME, DIR_SEPC); #else |