我习惯于使用 ghci 调试我的代码。通常，会发生这样的事情（当然不是那么明显）：
ghci> let f@(_:x) = 0:1:zipWith(+)f x
ghci> length f
然后，一段时间内什么都没有发生，如果我反应不够快，ghci 可能会吃掉 2 GB 的 RAM，导致我的系统死机。如果为时已晚，解决此问题的唯一方法是 [ALT] + [PRINT] + [K]。
我的问题：有没有一种简单的方法可以将 ghci 可以消耗的内存限制为 1 GB？如果超出限制，则应终止计算或终止 ghci。
【问题讨论】：
标签： debugging haskell memory-management ghc ghci
实现此目的的一种独立于平台的方法是像这样向 Haskell 运行时提供 -M 选项作为 on 选项
ghci +RTS -M1m
详情请参阅the GHC documentation’s page on how to control the RTS (runtime system)。
ghci 输出现在看起来像：
>ghci +RTS -M10m
GHCi, version 6.12.3: http://www.haskell.org/ghc/ :? for help
Loading package ghc-prim ... linking ... done.
Loading package integer-gmp ... linking ... done.
Loading package base ... linking ... done.
Loading package ffi-1.0 ... linking ... done.
Prelude> let f@(_:x) = 0:1:zipWith(+)f x
Prelude> length f
Heap exhausted;
Current maximum heap size is 10485760 bytes (10 MB);
use `+RTS -M<size>' to increase it.
【讨论】：
~/.bashrc 中创建了一个别名alias ghci='ghci +RTS -M500m -RTS'，现在一切都很好。非常感谢。
.ghci 文件？ haskell.org/ghc/docs/7.2.1/html/users_guide/ghci-dot-files.html
4Gb 的 RAM，我将其设置为 -M100m。它告诉我它设置为100Mb，这完全没问题，但是当我运行fib 100000 时，程序仍然几乎冻结了我的机器。它并没有像以前那样完全冻结它，但内存几乎已满，swap 正在被填满，导致大量 IO，使系统无法使用两分钟或更长时间。
alias ghci512="stack ghci --ghci-options '+RTS -M512m -RTS'"。如果您将堆栈用于项目，我建议您坚持使用其 ghci，以免在 RAM 中复制库和文件缓存。
在设置了ulimit -m 的shell 下运行它是一种相当简单的方法。如果您想定期运行一些限制，您可以在运行ghci 之前创建一个执行ulimit 的包装脚本。
【讨论】：
ulimit -m 102400 之类的东西，但它仍然会消耗内存。
ulimit -v，而不是ulimit -m。 -m 开关限制物理内存，而你需要限制虚拟：物理+交换。我使用 ulimit -v $(( (1024**2)*2 )) (zsh) 和 4 GiB RAM + 5 GiB 交换，它不会冻结系统。这将内存量限制为 2 GiB，可以放入 ~/.zshrc 或 ~/.bashrc。
ttyctl 和参数 -f 将阻止这种情况。
ulimit -v 102400 之类的操作，然后 - 在 ghci 之后 - 我想撤消：ulimit -v unlimited，但出现权限错误。