mirror of
https://github.com/typeable/bloodhound.git
synced 2024-09-11 08:25:32 +03:00
remove Seminearring class because it was not being used in V5
This commit is contained in:
parent
54c53c6923
commit
8daeabb589
@ -36,7 +36,6 @@ library
|
|||||||
exposed-modules: Database.V5.Bloodhound
|
exposed-modules: Database.V5.Bloodhound
|
||||||
Database.V5.Bloodhound.Client
|
Database.V5.Bloodhound.Client
|
||||||
Database.V5.Bloodhound.Types
|
Database.V5.Bloodhound.Types
|
||||||
Database.V5.Bloodhound.Types.Class
|
|
||||||
Database.V5.Bloodhound.Internal.Aggregation
|
Database.V5.Bloodhound.Internal.Aggregation
|
||||||
Database.V5.Bloodhound.Internal.Analysis
|
Database.V5.Bloodhound.Internal.Analysis
|
||||||
Database.V5.Bloodhound.Internal.Client
|
Database.V5.Bloodhound.Internal.Client
|
||||||
|
@ -122,7 +122,6 @@ module Database.V5.Bloodhound.Types
|
|||||||
, Hit(..)
|
, Hit(..)
|
||||||
, HitFields(..)
|
, HitFields(..)
|
||||||
, Filter(..)
|
, Filter(..)
|
||||||
, Seminearring(..)
|
|
||||||
, BoolMatch(..)
|
, BoolMatch(..)
|
||||||
, Term(..)
|
, Term(..)
|
||||||
, GeoPoint(..)
|
, GeoPoint(..)
|
||||||
@ -418,9 +417,8 @@ module Database.V5.Bloodhound.Types
|
|||||||
|
|
||||||
import Bloodhound.Import
|
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.Aggregation
|
||||||
|
import Database.V5.Bloodhound.Internal.Analysis
|
||||||
import Database.V5.Bloodhound.Internal.Client
|
import Database.V5.Bloodhound.Internal.Client
|
||||||
import Database.V5.Bloodhound.Internal.Highlight
|
import Database.V5.Bloodhound.Internal.Highlight
|
||||||
import Database.V5.Bloodhound.Internal.Newtypes
|
import Database.V5.Bloodhound.Internal.Newtypes
|
||||||
|
@ -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 <&&>
|
|
Loading…
Reference in New Issue
Block a user