Re: ERROR - Garbage collection fails to reclaim sufficient space

To improve on the behaviour you're seeing,  you either have to up
the heap size (via :set -h), or fix the space leak in your program (*).
Hugs doesn't dynamically expand the size of its heap.

--sigbjorn

* - here's one possible solution to letting go of input file data in
a timely fashion:

> collectAllData :: [String] ->      -- A list of filenames
>                   IO [String]      -- A list of results
> 
> collectAllData xs = mapM collectFileData xs >>= return.concat
> 
> collectFileData :: String -> IO [String]
> collectFileData fn = do
>     putStrLn $ "Reading: " ++ fn
>     contents <- readFile fn
>     case parseIt contents of
>       (a,b) | seqList a && seqList b -> return [fn,a,b,""]
>  where
>     parseIt cs = 
>       parseFile      $ 
>       filter (/= "") $ 
>       lines cs
> 
> seqList :: [a] -> Bool
> seqList [] = True
> seqList (x:xs) = x `seq` seqList xs


Henk-Jan.van.Tuyl <[email protected]> wrote:
>> L.S.,
>> 
>> When reading a lot of files, Hugs gives the message:
>>    ERROR - Garbage collection fails to reclaim sufficient space
>> 
>> I had this problem before with Hugs Version Nov 2002 after 40 files,
>> now with Hugs Version Nov 2003, it happens after 60 or 61 files; see
>> the attached program. If you want sample data files, just ask me.  
>> 
>> --
>> Best regards,
>> Henk-Jan van Tuyl
>