mirror of
https://github.com/typeable/rollbar-hs.git
synced 2024-09-11 05:35:27 +03:00
83a19e1750
This is almost entirely copy-pasted from `wai-middleware-rollbar` 0.8.4. The intent is to make the core data types available for other packages. If this gets unweildy, move it right back.
15 lines
351 B
Haskell
15 lines
351 B
Haskell
{-# LANGUAGE DataKinds #-}
|
|
module Rollbar.Golden where
|
|
|
|
import Data.Proxy (Proxy(Proxy))
|
|
|
|
import Rollbar.Item (Item)
|
|
import Rollbar.QuickCheck ()
|
|
|
|
import Test.Aeson.GenericSpecs (roundtripAndGoldenSpecs)
|
|
import Test.Hspec (hspec)
|
|
|
|
main :: IO ()
|
|
main =
|
|
hspec $ roundtripAndGoldenSpecs (Proxy :: Proxy (Item () '["Authorization"]))
|