{-# LANGUAGE OverloadedStrings #-} module Spec where import Control.Concurrent (forkIO, threadDelay) import Control.Concurrent.STM.TVar import Control.Monad (forever) import qualified Data.Text as T import Data.Time.Clock import System.Environment import Yoti -------------------------------------------------------------------------------- main :: IO () main = putStrLn "--"