diff options
| author |  ross <unknown> | 2005-01-06 11:27:48 +0000 |
|---|---|---|
| committer | ross <unknown> | 2005-01-06 11:27:48 +0000 |
| commit | dbd7fd6c08e277969cda763e1045a61015bd4429 (patch) | |
| tree | 9dce2e63d77fd400dffc3c49ca7d63b7a6c4a98d /System/Posix/Files.hsc | |
| parent | 94e1fc5f12e33fd2e0c4171cd13ef3109463cc92 (diff) | |
[project @ 2005-01-06 11:27:48 by ross]
c_ftruncate is now in System.Posix.Internals
Diffstat (limited to 'System/Posix/Files.hsc')
| -rw-r--r-- | System/Posix/Files.hsc | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/System/Posix/Files.hsc b/System/Posix/Files.hsc index a793034..e9a0477 100644 --- a/System/Posix/Files.hsc +++ b/System/Posix/Files.hsc @@ -426,12 +426,9 @@ foreign import ccall unsafe "truncate" c_truncate :: CString -> COff -> IO CInt setFdSize :: Fd -> FileOffset -> IO () -setFdSize fd off = +setFdSize (Fd fd) off = throwErrnoIfMinus1_ "setFdSize" (c_ftruncate fd off) -foreign import ccall unsafe "ftruncate" - c_ftruncate :: Fd -> COff -> IO CInt - -- ----------------------------------------------------------------------------- -- pathconf()/fpathconf() support |