4ef19aa35a
Add support for entities via a port of the EntityMap type, and implement command support starting at basic hjkl.
17 lines
293 B
Haskell
17 lines
293 B
Haskell
module Main where
|
|
|
|
import Xanthous.Prelude
|
|
import Brick
|
|
|
|
import Xanthous.Game (getInitialState)
|
|
import Xanthous.App (makeApp)
|
|
|
|
ui :: Widget ()
|
|
ui = str "Hello, world!"
|
|
|
|
main :: IO ()
|
|
main = do
|
|
app <- makeApp
|
|
let initialState = getInitialState
|
|
_ <- defaultMain app initialState
|
|
pure ()
|