module Network.HTTP.Lucu.Resource
    ( Resource
    )
    where

import           Control.Monad.State
import qualified Data.ByteString.Lazy.Char8 as B
import           Data.ByteString.Lazy.Char8 (ByteString)

data ResState = ResState -- FIXME

type ResourceT m a = StateT ResState m a

type Resource a = ResourceT IO a