16 lines
248 B
Haskell
16 lines
248 B
Haskell
|
module Types.Util where
|
||
|
|
||
|
import qualified Data.Text as T
|
||
|
|
||
|
import qualified Data.Map.Strict as M
|
||
|
|
||
|
import qualified SDL
|
||
|
|
||
|
-- internal imports
|
||
|
|
||
|
import Types.Subsystems
|
||
|
|
||
|
type Progress = (Float, T.Text)
|
||
|
|
||
|
type ActionTranslation = M.Map SDL.Keycode Action
|