[mew-dist 29158] Re: cmewが例外で終わる

Win32gmp.dll
libgmp.aDLL(-lXXX
DLL)
 m(__)m

smewcmew

Stat.hs:34:13:
    No instance for (Integral FILETIME)
      arising from a use of `fileTimeToUnixTime' at Stat.hs:34:13-30
    Possible fix: add an instance declaration for (Integral FILETIME)
    In the second argument of `(.)', namely `fileTimeToUnixTime'
    In the first argument of `($)', namely
        `return . fileTimeToUnixTime'
    In the expression: return . fileTimeToUnixTime $ ctime

Stat.hs

    (ctime,_,_) <- getFileTime fh	fhFILETIMEctime
    closeHandle fh
    return . fileTimeToUnixTime $ ctime	ctimefileTimeToUnixTime
  where
    -- http://support.microsoft.com/kb/167296/en-us
    -- 100 nano seconds since 1 Jan 1601
    -- MS: _FILETIME = {DWORD,DWORD} = {Word32,Word32}
    -- Haskell: FILETIME == DDWORD == Word64
    fileTimeToUnixTime x = (fromIntegral x - 116444736000000000) `div` 10000000
    FILETIME?

Haskell...



--
Shuichi KITAGUCHI // [email protected] / [email protected]