InstanceName.hs

{-# options_haddock prune #-}

-- |InstanceName Data Type, Internal
module Helic.Data.InstanceName where

import Polysemy.Time.Json (json)

newtype InstanceName =
  InstanceName { unInstanceName :: Text }
  deriving stock (Eq, Show, Generic)
  deriving newtype (IsString)

json ''InstanceName