diff options
| author | Raymond Lu <songyulu@hdfgroup.org> | 2009-01-14 20:41:17 (GMT) |
|---|---|---|
| committer | Raymond Lu <songyulu@hdfgroup.org> | 2009-01-14 20:41:17 (GMT) |
| commit | ea92781324c5ab1553d99e555f1bce477789e65b (patch) | |
| tree | b308dc8ff72558b3edb0211cfd674241b99f1c96 /src/H5private.h | |
| parent | 6564dbcfaa09da479cc5e393693799e329fc1330 (diff) | |
| download | hdf5-ea92781324c5ab1553d99e555f1bce477789e65b.zip hdf5-ea92781324c5ab1553d99e555f1bce477789e65b.tar.gz hdf5-ea92781324c5ab1553d99e555f1bce477789e65b.tar.bz2 | |
[svn-r16316] Added support for OpenVMS pathname for external links.
Tested on jam. Tested v1.8 on OpenVMS.
Diffstat (limited to 'src/H5private.h')
| -rw-r--r-- | src/H5private.h | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/src/H5private.h b/src/H5private.h index 63bbcf4..2f75f86 100644 --- a/src/H5private.h +++ b/src/H5private.h @@ -1375,8 +1375,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 '/' @@ -1397,6 +1396,18 @@ 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 #define DIR_SEPC '/' |