{-# LANGUAGE NoImplicitPrelude #-}-- | Things common to all file locking implementations.moduleGHC.IO.Handle.Lock.Common(FileLockingNotSupported (..),LockMode (..))whereimportGHC.Exception importGHC.Show -- | Exception thrown by 'hLock' on non-Windows platforms that don't support-- 'flock'.dataFileLockingNotSupported =FileLockingNotSupported derivingInt -> FileLockingNotSupported -> ShowS
[FileLockingNotSupported] -> ShowS
FileLockingNotSupported -> String
(Int -> FileLockingNotSupported -> ShowS)
-> (FileLockingNotSupported -> String)
-> ([FileLockingNotSupported] -> ShowS)
-> Show FileLockingNotSupported
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> FileLockingNotSupported -> ShowS
showsPrec :: Int -> FileLockingNotSupported -> ShowS
$cshow :: FileLockingNotSupported -> String
show :: FileLockingNotSupported -> String
$cshowList :: [FileLockingNotSupported] -> ShowS
showList :: [FileLockingNotSupported] -> ShowS
Show -- ^ @since 4.10.0.0-- ^ @since 4.10.0.0instanceException FileLockingNotSupported -- | Indicates a mode in which a file should be locked.dataLockMode =SharedLock |ExclusiveLock