about summary refs log tree commit diff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorGriffin Smith <root@gws.fyi>2019-08-25T17·28-0400
committerGriffin Smith <root@gws.fyi>2019-08-25T17·28-0400
commitd3f3890dc5408581eb6181125c871d1cf2c0e18f (patch)
treeed6d9e396e6c732b1bce27ea6962ce408b59f218 /src/Main.hs
parentfb0d1b3e66251aa56a3df1d05fd4b82b33380a31 (diff)
An @-sign in a box, in haskell
Initial commit of a Haskell version of Xanthous, written using Brick and
built with Nix.

This is so much nicer and so much easier
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs17
1 files changed, 17 insertions, 0 deletions
diff --git a/src/Main.hs b/src/Main.hs
new file mode 100644
index 000000000000..1cd4e9445789
--- /dev/null
+++ b/src/Main.hs
@@ -0,0 +1,17 @@
+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
+  initialState <- getInitialState
+  _ <- defaultMain app initialState
+  pure ()