11 lines
234 B
Haskell
11 lines
234 B
Haskell
|
module Backend where
|
||
|
|
|
||
|
|
import Common.Route
|
||
|
|
import Obelisk.Backend
|
||
|
|
|
||
|
|
backend :: Backend BackendRoute FrontendRoute
|
||
|
|
backend = Backend
|
||
|
|
{ _backend_run = \serve -> serve $ const $ return ()
|
||
|
|
, _backend_routeEncoder = fullRouteEncoder
|
||
|
|
}
|