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