File tree Expand file tree Collapse file tree 1 file changed +1
-5
lines changed Expand file tree Collapse file tree 1 file changed +1
-5
lines changed Original file line number Diff line number Diff line change @@ -175,6 +175,7 @@ foreign import ccall unsafe "HsUnix.h close"
175
175
foreign import capi unsafe " dirent.h fdopendir"
176
176
c_fdopendir :: CInt -> IO (Ptr CDir )
177
177
178
+
178
179
-- | @readDirStreamWith f dp@ calls @readdir@ to obtain the next directory entry
179
180
-- (@struct dirent@) for the open directory stream @dp@. If an entry is read,
180
181
-- it passes the pointer to that structure to the provided function @f@ for
@@ -226,11 +227,6 @@ foreign import ccall unsafe "__hscore_readdir"
226
227
foreign import ccall unsafe " __hscore_free_dirent"
227
228
c_freeDirEnt :: Ptr CDirent -> IO ()
228
229
229
- foreign import ccall unsafe " __hscore_d_name"
230
- d_name :: Ptr CDirent -> IO CString
231
-
232
- foreign import ccall unsafe " __hscore_d_type"
233
- d_type :: Ptr CDirent -> IO CChar
234
230
235
231
-- | @rewindDirStream dp@ calls @rewinddir@ to reposition
236
232
-- the directory stream @dp@ at the beginning of the directory.
You can’t perform that action at this time.
0 commit comments