src/executable/haskell/Main.hs


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

{-# LANGUAGE OverloadedStrings #-}

module Main
  ( main
  ) where

import qualified Conf
import qualified Service.AdListener as AdListener

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