packages feed

indexation 0.4.2.2 → 0.4.2.3

raw patch · 2 files changed

+3/−1 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

indexation.cabal view
@@ -1,5 +1,5 @@ name: indexation-version: 0.4.2.2+version: 0.4.2.3 category: Data synopsis: Tools for entity indexation description: A set of tools for indexing entities
library/Indexation/Potoki/Transform.hs view
@@ -20,6 +20,7 @@  index :: (Eq entity, Hashable entity) => Indexer entity -> Transform entity (Index entity) index (Indexer sizeVar map) =+  {-# SCC "index" #-}    mapInIO $ \ entity -> atomically $ StmMap.focus focus entity map   where     focus = Focus.Focus conceal reveal where@@ -31,6 +32,7 @@  lookup :: EntityTable entity -> Transform (Index entity) (Maybe entity) lookup (EntityTable entityTableVector) =+  {-# SCC "lookup" #-}    arr $ \ (Index indexInt) -> if Vector.length entityTableVector > indexInt     then Just $! Vector.unsafeIndex entityTableVector indexInt     else Nothing