如何在haskell中处理SIGWINCH?

时间:2021-08-01 13:35:23

标签: haskell signals posix

嗨,我是 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 中处理它?<​​/p>

1 个答案:

答案 0 :(得分:3)

以下应该允许您安装处理程序来处理(非标准)SIGWINCH POSIX 信号:

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

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

其中 handlerIO () 类型的操作。

哈斯克林快乐!