diff options
| author |  Herbert Valerio Riedel <hvr@gnu.org> | 2014-12-06 17:08:06 +0100 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2014-12-06 17:08:06 +0100 |
| commit | 078666f4399f368e2f3dd82b5081dc1ad9b9fdc2 (patch) | |
| tree | 247882ab50a9e32a659aa513751f9e16ec310207 /System/Posix/Directory/Common.hsc | |
| parent | 558b0fb4eaa4aebc823022b3e1d560da3faad658 (diff) | |
`M-x untabify` && `M-x delete-trailing-whitespace`
Diffstat (limited to 'System/Posix/Directory/Common.hsc')
| -rw-r--r-- | System/Posix/Directory/Common.hsc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/System/Posix/Directory/Common.hsc b/System/Posix/Directory/Common.hsc index 7cc61af..ea43c5c 100644 --- a/System/Posix/Directory/Common.hsc +++ b/System/Posix/Directory/Common.hsc @@ -7,7 +7,7 @@ -- Module : System.Posix.Directory.Common -- Copyright : (c) The University of Glasgow 2002 -- License : BSD-style (see the file libraries/base/LICENSE) --- +-- -- Maintainer : libraries@haskell.org -- Stability : provisional -- Portability : non-portable (requires POSIX) @@ -79,7 +79,7 @@ foreign import ccall unsafe "telldir" #endif changeWorkingDirectoryFd :: Fd -> IO () -changeWorkingDirectoryFd (Fd fd) = +changeWorkingDirectoryFd (Fd fd) = throwErrnoIfMinus1Retry_ "changeWorkingDirectoryFd" (c_fchdir fd) foreign import ccall unsafe "fchdir" |