Skip to content
Merged
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion ghcide/src/Text/Fuzzy/Parallel.hs
Original file line number Diff line number Diff line change
Expand Up @@ -132,7 +132,7 @@ parVectorChunk chunkSize st v =
chunkVector :: Int -> Vector a -> [Vector a]
chunkVector chunkSize v = do
let indices = chunkIndices chunkSize (0,V.length v)
[V.slice l (h-l) v | (l,h) <- indices]
[V.slice l (h-l+1) v | (l,h) <- indices]

-- >>> chunkIndices 3 (0,9)
-- >>> chunkIndices 3 (0,10)
Expand Down