main.hs
1 import Common.Route (fullRouteEncoder) 2 import Frontend (frontend) 3 import Obelisk.Frontend (runFrontend) 4 import Obelisk.Route.Frontend (checkEncoder) 5 import Reflex.Dom (run) 6 7 main :: IO () 8 main = do 9 let Right validFullEncoder = checkEncoder fullRouteEncoder 10 run $ runFrontend validFullEncoder frontend