HAppS.State under Windows

5 views
Skip to first unread message

awson

unread,
Jun 4, 2008, 5:31:58 AM6/4/08
to HAppS
HAppS.State contains the bug that renders it unusable under Windows.

HAppS.State.Saver.Impl.File uses Char8 bytestrings. So, openFile
instead of openBinaryFile is used.

This patch cures the problem:

--- File.hs Wed Mar 5 18:48:21 2008
+++ G:\HAppS-0.9.2.x-fixed\HAppS-State\src\HAppS\State\Saver\Impl
\File.hs Wed Jun 4 12:28:52 2008
@@ -7,8 +7,8 @@

import Control.Concurrent
import Control.Exception ( try )
-import qualified Data.ByteString.Lazy.Char8 as L
-import qualified Data.ByteString.Char8 as B
+import qualified Data.ByteString.Lazy as L
+import qualified Data.ByteString as B
import System.Directory ( createDirectoryIfMissing,
renameFile, doesFileExist )
import System.IO
import System.Random ( randomIO )
Reply all
Reply to author
Forward
0 new messages