Как сравнить полукокса и бежать концевую последовательность

Question

побег Если у меня есть что-то вроде этого:

main :: IO()      
main = do       
    hSetBuffering stdin NoBuffering 
    c <- getChar     

Как бы я идти о сравнении C, чтобы увидеть, если я получил управляющую последовательность, как клавиши со стрелками или Ctrl плюс ключ.

Благодаря

Answer 1

Вы можете посмотреть на ожидаемые последовательности с использованием Terminfo базы данных.

См. Модуль System.Terminfo.Keys.

Например:

Prelude System.Console.Terminfo> t <- setupTermFromEnv 
Prelude System.Console.Terminfo> getCapability t keyLeft 
Just "\ESCOD" 

Что касается управляющих символов, те просто выглядят как ASCII управления:

Prelude> getChar -- pressing control L 
'\f' 
Prelude> '\f' == '\^L' 
True 

Вы могли бы лучше использовать более полную библиотеку для взаимодействия с терминал как vty.