{-# OPTIONS_GHC -fno-warn-orphans #-}

module Data.List.NonEmpty.Instances
  (
  ) where

import Data.List.NonEmpty

import Language.Haskell.TH.Syntax (Lift(..))

instance Lift a => Lift (NonEmpty a) where
  lift (toList -> xs) = [e|fromList xs|]