如何在haskell中处理SIGWINCH？

如何解决如何在haskell中处理SIGWINCH？

嗨，我是 Haskell 的新手，一直在研究一些 Haskell 代码来处理 POSIX 系统上的信号。

特别是我想用 Haskell 处理 SIGWINCH

我在谷歌上搜索了它们并看到了一些关于 Hackage 的文档，但我不太确定我能用它做些什么。

然后我在下面找到了一些关于与 C 代码混合的帖子

#include <stdio.h>
#include <unistd.h>
#include <signal.h>

static void sig_handler(int sig) {
    if (SIGWINCH == sig) {
        printf("you resized terminal\n");
    }
}

int main() {
    signal(SIGWINCH,sig_handler);
    while (1) {
        pause();
    }

    return 0;
}

但我对没有任何 C 代码的“Haskell 方式”更感兴趣。

我找到了一个关于处理 SIGINT 信号的示例，但找不到关于 SIGWINCH 的任何信息。

我如何在 Haskell 中处理它？

解决方法

以下应该允许您安装处理程序来处理（非标准）SIGWINCH POSIX 信号：

import System.Posix.Signals
import System.Posix.Signals.Exts

main :: IO ()
main = do
  installHandler sigWINCH (Catch handler) Nothing

其中 handler 是 IO () 类型的操作。

哈斯克林快乐！