diff options
Diffstat (limited to 'fortran/src/H5Pf.c')
-rw-r--r-- | fortran/src/H5Pf.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c index 7f0958d..c3bd709 100644 --- a/fortran/src/H5Pf.c +++ b/fortran/src/H5Pf.c @@ -3210,12 +3210,12 @@ HD5packFstring(tmp, _fcdtocp(memb_name), (size_t)(c_lenmax*H5FD_MEM_NTYPES)); for (i=0; i < H5FD_MEM_NTYPES; i++) { memb_map[i] = (int_f)c_memb_map[i]; memb_fapl[i] = (hid_t_f)c_memb_fapl[i]; -#if defined(WIN32) +#if defined(_WIN32) memb_addr[i] = -1; #else if(c_memb_addr[i] == HADDR_UNDEF) memb_addr[i] = -1; else memb_addr[i] = (real_f) ((long)c_memb_addr[i]/HADDR_MAX); -#endif /*WIN32*/ +#endif /*_WIN32*/ } *flag = (int_f)relax; *maxlen_out = (int_f)length; |