- -- close the file descriptor, but not when this is the read side
- -- of a duplex handle.
+ -- close the file descriptor, but not when this is the read
+ -- side of a duplex handle, and not when this is one of the
+ -- std file handles.
-- we must set the fd to -1, because the finalizer is going
-- to run eventually and try to close/unlock it.
-- we must set the fd to -1, because the finalizer is going
-- to run eventually and try to close/unlock it.
foreign import ccall "prel_seek_cur" unsafe sEEK_CUR :: CInt
foreign import ccall "prel_seek_set" unsafe sEEK_SET :: CInt
foreign import ccall "prel_seek_end" unsafe sEEK_END :: CInt
foreign import ccall "prel_seek_cur" unsafe sEEK_CUR :: CInt
foreign import ccall "prel_seek_set" unsafe sEEK_SET :: CInt
foreign import ccall "prel_seek_end" unsafe sEEK_END :: CInt