import qualified System.Posix as Posix
#endif
+#endif /* __GLASGOW_HASKELL__ */
+
{- $intro
A directory contains a series of entries, each of which is a named
reference to a file system object (file, directory etc.). Some
-}
+#ifdef __GLASGOW_HASKELL__
+
getPermissions :: FilePath -> IO Permissions
getPermissions name = do
#ifdef mingw32_HOST_OS