打印递归循环的调用栈

Print call stack of recursive loop

是否有通用函数(printCallStack)可以打印递归循环的调用堆栈。

例如,

printCallStack(length ([7, 1 'quot' 0])) 

打印调用堆栈:

您似乎在寻找类似 Hat 的东西,它是 haskell 的源代码级跟踪器,并且可能专门用于 hat-stack,它是堆栈跟踪器组件。

您也可以使用 ghci 内置的 debugger/tracer。不如帽子好,但不需要重新编译您的代码并且它很容易获得。如果您想知道,它是 ghci 中的 :trace 命令。