{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TemplateHaskell #-}

module Dodge.Data.Payload where

import Data.Aeson
import Data.Aeson.TH

data Payload = ExplosionPayload | DudPayload
    deriving (Show, Eq, Ord, Enum, Bounded, Read) --Generic, Flat)

deriveJSON defaultOptions ''Payload