adding to GHC/win32 Handle operations support of Unicode
filenames and files larger than 4 GB
Sven Panne
Sven.Panne at aedion.de
Tue Nov 22 12:53:55 EST 2005
Am Montag, 21. November 2005 13:01 schrieb Bulat Ziganshin:
> [...]
> #ifdef mingw32_HOST_OS
> type CFilePath = LPCTSTR
> type CFileOffset = Int64
> withCFilePath = withTString
> peekCFilePath = peekTString
> #else
> type CFilePath = CString
> type CFileOffset = COff
> withCFilePath = withCString
> peekCFilePath = peekCString
> #endif
> [...]
> #ifdef mingw32_HOST_OS
> INLINE time_t __hscore_st_mtime ( struct _stati64* st ) { return
> st->st_mtime; } #else
> INLINE time_t __hscore_st_mtime ( struct stat* st ) { return st->st_mtime;
> } #endif
>[...]
Whatever will be done, please use *feature-based* ifdefs, not those
platform-dependent ones above, which will be proven wrong either immediately
or after a short time. We already have too much of those wrong ifdefs in the
code...
Cheers,
S.
More information about the Glasgow-haskell-users
mailing list