diff options
| author |  Simon Marlow <marlowsd@gmail.com> | 2009-09-08 14:46:27 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-09-08 14:46:27 +0000 |
| commit | f4fe16adfffffff3082ff24eb52201a294fe4c2e (patch) | |
| tree | 0abbaaf2b62e8d63072b850e70ec5087436031dd /System/Posix/Semaphore.hsc | |
| parent | f084067857cabbc5d0a8f14ac5d2a4a1aee5e690 (diff) | |
remove dead code
Diffstat (limited to 'System/Posix/Semaphore.hsc')
| -rw-r--r-- | System/Posix/Semaphore.hsc | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/System/Posix/Semaphore.hsc b/System/Posix/Semaphore.hsc index a031b00..a9d59df 100644 --- a/System/Posix/Semaphore.hsc +++ b/System/Posix/Semaphore.hsc @@ -111,9 +111,6 @@ semGetValue_ sem ptr = do throwErrnoIfMinus1Retry_ "semGetValue" $ cint <- peek ptr return $ fromEnum cint -foreign import ccall safe "wrapper" - mkCallback :: (Ptr () -> IO ()) -> IO (FunPtr (Ptr () -> IO ())) - foreign import ccall safe "sem_open" sem_open :: CString -> CInt -> CMode -> CUInt -> IO (Ptr ()) foreign import ccall safe "sem_close" |