diff options
author | Raymond Lu <songyulu@hdfgroup.org> | 2009-01-14 19:48:39 (GMT) |
---|---|---|
committer | Raymond Lu <songyulu@hdfgroup.org> | 2009-01-14 19:48:39 (GMT) |
commit | f677f9fbcfe035593cc1989c171215c43933b12d (patch) | |
tree | 8524fdf8ca3d19f5a72eff107af9de309622cc7c /src/H5private.h | |
parent | 127792fc31119f192f6016871dcab29acc8504b4 (diff) | |
download | hdf5-f677f9fbcfe035593cc1989c171215c43933b12d.zip hdf5-f677f9fbcfe035593cc1989c171215c43933b12d.tar.gz hdf5-f677f9fbcfe035593cc1989c171215c43933b12d.tar.bz2 |
[svn-r16314] Added support for OpenVMS pathname for external link.
Tested on OpenVMS and jam.
Diffstat (limited to 'src/H5private.h')
-rw-r--r-- | src/H5private.h | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/src/H5private.h b/src/H5private.h index 56a5fde..48c66cc 100644 --- a/src/H5private.h +++ b/src/H5private.h @@ -1369,8 +1369,7 @@ extern char *strdup(const char *s); #define HDpthread_self_ulong() ((unsigned long)pthread_self()) #endif /* HDpthread_self_ulong */ - -#ifdef H5_HAVE_WINDOW_PATH +#if defined(H5_HAVE_WINDOW_PATH) /* directory delimiter for Windows: slash and backslash are acceptable on Windows */ #define DIR_SLASH_SEPC '/' @@ -1391,6 +1390,17 @@ extern char *strdup(const char *s); (ptr = slash); \ } +#elif defined(H5_HAVE_VMS_PATH) + +/* OpenVMS pathname: <disk name>$<partition>:[path]<file name> + * i.g. SYS$SYSUSERS:[LU.HDF5.SRC]H5system.c */ +#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, ']'); #else |