13 lines
247 B
Haskell
13 lines
247 B
Haskell
{-# 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|]
|