[cvs-nhc98] Type of `free' has changed from `Addr' to `Ptr a' -> IO ()