小编Sel*_*yst的帖子

我有一个haskell问题...我在haskell中打开一个文件,之后我想在该文件中添加一些文本.

ame :: IO ()

ame = do
    putStr "Enter the file name: "
    name <- getLine
    file <- readFile name
    putStrLn "Do you want to add new records? "
    question <- getLine
    if question == "yes" then do
        putStrLn "Enter your records:"
        newRec <- getLine
        file <- writeFile name (file ++ newRec)

        putStrLn "a"
    else
        putStr "b"

这是我的代码.当我想在我的文件中添加(写入)新内容时,我收到此错误..."openFile:resource busy(file is locked)".我怎么能解决这个问题？我被告知这是因为我没有关闭文件..但我怎么能关闭它？