correct type of emptyDict and emptySet
This commit is contained in:
parent
d531c48a92
commit
cb45d88e17
2 changed files with 2 additions and 2 deletions
|
|
@ -13,7 +13,7 @@ const mkType = makeTypeParser({
|
|||
});
|
||||
|
||||
export const ModuleDict = [
|
||||
["emptyDict", newDynamic(emptyDict)(mkType("(a -> a -> Int) -> (a => b) "))],
|
||||
["emptyDict", newDynamic(emptyDict)(mkType("(a -> a -> Ordering) -> (a => b) "))],
|
||||
["has" , newDynamic(has )(mkType("(a => b) -> a -> Bool "))],
|
||||
["set" , newDynamic(set )(mkType("(a => b) -> a -> b -> (a => b) "))],
|
||||
["remove" , newDynamic(remove )(mkType("(a => b) -> a -> (a => b) "))],
|
||||
|
|
|
|||
|
|
@ -13,7 +13,7 @@ const mkType = makeTypeParser({
|
|||
});
|
||||
|
||||
export const ModuleSet = [
|
||||
["emptySet", newDynamic(emptySet)(mkType("(a -> a -> Int) -> {a}" ))],
|
||||
["emptySet", newDynamic(emptySet)(mkType("(a -> a -> Ordering) -> {a}" ))],
|
||||
["has" , newDynamic(has )(mkType("{a} -> a -> Bool" ))],
|
||||
["add" , newDynamic(add )(mkType("{a} -> a -> {a}" ))],
|
||||
["remove" , newDynamic(remove )(mkType("{a} -> a -> {a}" ))],
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue