src/executable/haskell/Main.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

module Main
  ( main
  ) where

import qualified Network.Wreq.Session as Session

import qualified Conf
import qualified Service.AdListener   as AdListener

main :: IO ()
main = do
  conf <- Conf.parse "application.conf"
  session <- Session.newSession
  AdListener.start conf session