Skip to content

Commit 0827e13

Browse files
authored
Fix deleteFindMin Haddock example (#710)
deleteFindMin was missing the map argument (`empty`).
1 parent b216597 commit 0827e13

File tree

2 files changed

+2
-1
lines changed

2 files changed

+2
-1
lines changed

.gitignore

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -7,6 +7,7 @@
77
*.tix
88
.hpc/
99
/dist/*
10+
/dist-newstyle/*
1011
GNUmakefile
1112
dist-install
1213
ghc.mk

containers/src/Data/Map/Internal.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3949,7 +3949,7 @@ maxViewSure = go
39493949
-- | /O(log n)/. Delete and find the minimal element.
39503950
--
39513951
-- > deleteFindMin (fromList [(5,"a"), (3,"b"), (10,"c")]) == ((3,"b"), fromList[(5,"a"), (10,"c")])
3952-
-- > deleteFindMin Error: can not return the minimal element of an empty map
3952+
-- > deleteFindMin empty Error: can not return the minimal element of an empty map
39533953

39543954
deleteFindMin :: Map k a -> ((k,a),Map k a)
39553955
deleteFindMin t = case minViewWithKey t of

0 commit comments

Comments
 (0)