projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 1998-03-06 17:40:11 by simonpj]
[ghc-hetmet.git]
/
ghc
/
compiler
/
utils
/
FiniteMap.lhs
diff --git
a/ghc/compiler/utils/FiniteMap.lhs
b/ghc/compiler/utils/FiniteMap.lhs
index
432d4f2
..
cf08d7c
100644
(file)
--- a/
ghc/compiler/utils/FiniteMap.lhs
+++ b/
ghc/compiler/utils/FiniteMap.lhs
@@
-38,7
+38,7
@@
module FiniteMap (
intersectFM,
intersectFM_C,
intersectFM,
intersectFM_C,
- mapFM, filterFM,
+ mapFM, filterFM,
sizeFM, isEmptyFM, elemFM, lookupFM, lookupWithDefaultFM,
sizeFM, isEmptyFM, elemFM, lookupFM, lookupWithDefaultFM,
@@
-139,6
+139,7
@@
mapFM :: (key -> elt1 -> elt2) -> FiniteMap key elt1 -> FiniteMap key elt2
filterFM :: (Ord key OUTPUTABLE_key) => (key -> elt -> Bool)
-> FiniteMap key elt -> FiniteMap key elt
filterFM :: (Ord key OUTPUTABLE_key) => (key -> elt -> Bool)
-> FiniteMap key elt -> FiniteMap key elt
+
-- INTERROGATING
sizeFM :: FiniteMap key elt -> Int
isEmptyFM :: FiniteMap key elt -> Bool
-- INTERROGATING
sizeFM :: FiniteMap key elt -> Int
isEmptyFM :: FiniteMap key elt -> Bool