{-# OPTIONS_GHC -Wno-orphans -Wno-missing-methods #-}
module Darcs.Patch.Prim.FileUUID.Coalesce () where

import Darcs.Prelude

import Darcs.Patch.Prim.Class ( PrimCanonize(..), PrimSift(..) )
import Darcs.Patch.Prim.FileUUID.Core( Prim )

-- none of the methods are implemented
instance PrimCanonize Prim where
  sortCoalesceFL :: FL Prim wX wY -> FL Prim wX wY
sortCoalesceFL = FL Prim wX wY -> FL Prim wX wY
forall a. a -> a
id -- just so that we can use it in the tests

-- none of the methods are implemented
instance PrimSift Prim