diff --git a/src/System/PosixCompat/Files.hsc b/src/System/PosixCompat/Files.hsc
--- a/src/System/PosixCompat/Files.hsc
+++ b/src/System/PosixCompat/Files.hsc
@@ -433,7 +433,7 @@
     epochTimeToFileTime (CTime t) = FILETIME (fromIntegral ll)
       where
         ll :: Int64
-        ll = t * 10000000 + 116444736000000000
+        ll = fromIntegral t * 10000000 + 116444736000000000
 
 touchFile :: FilePath -> IO ()
 touchFile name =
diff --git a/unix-compat.cabal b/unix-compat.cabal
--- a/unix-compat.cabal
+++ b/unix-compat.cabal
@@ -1,5 +1,5 @@
 name:           unix-compat
-version:        0.4.3.0
+version:        0.4.3.1
 synopsis:       Portable POSIX-compatibility layer.
 description:    This package provides portable implementations of parts
                 of the unix package. This package re-exports the unix
