X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=include%2FHsDirectory.h;h=b74f069d310063a8d6cfcc69706256fa3ac6aec3;hb=6c7b6c450f8a8a3f60ff124742f0c421742406f2;hp=7f33f08cfe74fead33e4a293f4350ebe18777e39;hpb=b33cc8f0d60e7ab53a916bff339ff40a677e0a62;p=haskell-directory.git

diff --git a/include/HsDirectory.h b/include/HsDirectory.h
index 7f33f08..b74f069 100644
--- a/include/HsDirectory.h
+++ b/include/HsDirectory.h
@@ -69,7 +69,6 @@ INLINE HsInt __hscore_long_path_size() {
 #endif
 }
 
-#ifdef __GLASGOW_HASKELL__
 INLINE int __hscore_R_OK() { return R_OK; }
 INLINE int __hscore_W_OK() { return W_OK; }
 INLINE int __hscore_X_OK() { return X_OK; }
@@ -78,7 +77,6 @@ INLINE mode_t __hscore_S_IRUSR() { return S_IRUSR; }
 INLINE mode_t __hscore_S_IWUSR() { return S_IWUSR; }
 INLINE mode_t __hscore_S_IXUSR() { return S_IXUSR; }
 INLINE mode_t __hscore_S_IFDIR() { return S_IFDIR; }
-#endif
 
 #if defined(__MINGW32__)