ghcup-hs/vendored/ansi-terminal-game-1.8.0.0/platform-dep/non-win/Terminal/Game/Utils.hs

15 lines
510 B
Haskell

--------------------------------------------------------------------------------
-- Nonbuffering getChar
-- 2017 Francesco Ariis GPLv3 80cols
--------------------------------------------------------------------------------
module Terminal.Game.Utils ( inputCharTerminal,
isWin32Console )
where
inputCharTerminal :: IO Char
inputCharTerminal = getChar
isWin32Console :: IO Bool
isWin32Console = return False