haskell - actionFinally 没有运行在处理程序内部调用的 cmd

Question

我有以下代码片段：

withContainer :: String -> (String -> Action a) -> Action a
  cid <= cmd "docker" [ "run" , "--rm", "-d", my_image ]
  ... 
  actionFinally (action containerName) $ do
    cmd_ "docker" [ "rm", "-f", filter (/= '\n') cid ]

无论操作是否成功，它都应该杀死容器。但是我注意到当操作失败时容器仍然保持启动并运行，这很烦人。我究竟做错了什么？

Answer 1

这个代码示例看起来是正确的，并且单独测试它的变体确实有效。在https://github.com/ndmitchell/shake/issues/731上提出了一个错误，以确定它在您的情况下不起作用的确切原因。