Event -> Int -> IO () loop render poll n = do render (string (show n)) Termbox. NoCursor poll >>= \case Termbox. EventKey Termbox. KeyEsc -> pure () _ -> loop ...
確定！ 回上一頁
