#define _REENTRANT 1 (needed to get the right errno on some OSs)

[haskell-directory.git] / include / dirUtils.h

diff --git a/include/dirUtils.h b/include/dirUtils.h
index ce11b08..2330912 100644 (file)
--- a/include/dirUtils.h
+++ b/include/dirUtils.h
@@ -9,4 +9,12 @@
 extern HsInt __hscore_readdir(HsAddr dirPtr, HsAddr pDirEnt);
 extern HsInt __hscore_renameFile(HsAddr src, HsAddr dest);
 
+#if defined(mingw32_HOST_OS)
+extern int __hscore_getFolderPath(HWND hwndOwner,
+                                 int nFolder,
+                                 HANDLE hToken,
+                                 DWORD dwFlags,
+                                 char*  pszPath);
+#endif
+
 #endif /* __DIRUTILS_H__ */