remove Seminearring class because it was not being used in V5

This commit is contained in:
Jose Duran 2019-08-01 18:01:16 -05:00
parent 54c53c6923
commit 8daeabb589
3 changed files with 1 additions and 21 deletions

View File

@ -36,7 +36,6 @@ library
exposed-modules: Database.V5.Bloodhound
Database.V5.Bloodhound.Client
Database.V5.Bloodhound.Types
Database.V5.Bloodhound.Types.Class
Database.V5.Bloodhound.Internal.Aggregation
Database.V5.Bloodhound.Internal.Analysis
Database.V5.Bloodhound.Internal.Client

View File

@ -122,7 +122,6 @@ module Database.V5.Bloodhound.Types
, Hit(..)
, HitFields(..)
, Filter(..)
, Seminearring(..)
, BoolMatch(..)
, Term(..)
, GeoPoint(..)
@ -418,9 +417,8 @@ module Database.V5.Bloodhound.Types
import Bloodhound.Import
import Database.V5.Bloodhound.Types.Class
import Database.V5.Bloodhound.Internal.Analysis
import Database.V5.Bloodhound.Internal.Aggregation
import Database.V5.Bloodhound.Internal.Analysis
import Database.V5.Bloodhound.Internal.Client
import Database.V5.Bloodhound.Internal.Highlight
import Database.V5.Bloodhound.Internal.Newtypes

View File

@ -1,17 +0,0 @@
{-# LANGUAGE CPP #-}
module Database.V5.Bloodhound.Types.Class
( Seminearring(..) )
where
#if !MIN_VERSION_base(4,8,0)
import Data.Monoid
#endif
class Monoid a => Seminearring a where
-- 0, +, *
(<||>) :: a -> a -> a
(<&&>) :: a -> a -> a
(<&&>) = mappend
infixr 5 <||>
infixr 5 <&&>