@@ -580,10 +580,19 @@ let filter = RangeFilter (FieldName "age")
580-- -> CacheKey
580-- -> CacheKey
581-- -> Filter
581-- -> Filter
582let filter = RegexpFilter (FieldName "user") (Regexp "bite.*app")
582let filter = RegexpFilter (FieldName "user") (Regexp "bite.*app")
583− RegexpAll (CacheName "test") False (CacheKey "key")
583+ AllRegexpFlags (CacheName "test") False (CacheKey "key")
585−-- RegexpFlags can be a combination of RegexpAll, Complement,
585+-- n.b.
586−-- Interval, Intersection, AnyString, and a combination of two options thereof.
586+-- data RegexpFlags = AllRegexpFlags
588+-- | SomeRegexpFlags (NonEmpty RegexpFlag) deriving (Eq, Show)
590+-- data RegexpFlag = AnyString
595+-- | Interval deriving (Eq, Show)