diff options
author | Griffin Smith <root@gws.fyi> | 2019-09-01T20·21-0400 |
---|---|---|
committer | Griffin Smith <root@gws.fyi> | 2019-09-02T14·52-0400 |
commit | adb3b74c0c3a3bffa0d47f52036fde3623f859f7 (patch) | |
tree | 3a2e416ea31f92562ba6eabf0fc4ddf2974b24b7 /src/Main.hs | |
parent | 2fd3e4c9ad28b77a0d167ceefe879ca80ee1ee04 (diff) |
Link up messages to the overall game
Add a "say" function for saying messages within an app monad to the user, and link everything up to display them and track their history
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index de867067b971..1cd4e9445789 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -12,6 +12,6 @@ ui = str "Hello, world!" main :: IO () main = do app <- makeApp - let initialState = getInitialState + initialState <- getInitialState _ <- defaultMain app initialState pure () |