client/src/Model/Route.hs


1
2
3
4
5
6
7
8
9
10

module Model.Route
  ( Route(..)
  ) where

data Route
  = RootRoute
  | IncomeRoute
  | CategoryRoute
  | NotFoundRoute
  deriving (Eq, Show)