Simon Marlow <[email protected]> writes:
> On 10/10/2009 09:41, Salvatore Insalaco wrote:
>> On Sat, Oct 10, 2009 at 10:26 AM, Petr Rockai<[email protected]> wrote:
>>
>> The issue is in Storage.Hashed.Index.indexFormatValid:
>> fd<- openBinaryFile path ReadMode
>> magic<- sequence [ hGetChar fd | _<- [1..size_magic] :: [Int] ]
>
> slightly off-topic, but... ew. At the very least:
>
> magic <- replicateM size_magic $ hGetChar fd
I have fixed both issues in hashed-storage HEAD (now installed on the
win-paradise buildslave as well). The code now looks like this:
do magic <- mmapFileByteString path (Just (0, size_magic))
return $ case BSC.unpack magic of
Yours,
Petr.
_______________________________________________
darcs-users mailing list
[email protected]
http://lists.osuosl.org/mailman/listinfo/darcs-users
