aeson-schemas-1.1.0: test/SumType.hs

{-# LANGUAGE DataKinds #-}

module SumType where

import Data.Aeson.Schema.Utils.Sum (SumType(..))

type SpecialJSON = SumType '[Bool, Int, [String]]