fix some comments
This commit is contained in:
parent
b85dcb5402
commit
244b33d786
2 changed files with 1 additions and 5 deletions
|
@ -674,9 +674,6 @@ compareType defs ctx s t = do
|
|||
|
||||
|
||||
parameters (loc : Loc) (ctx : TyContext d n)
|
||||
-- [todo] only split on the dvars that are actually used anywhere in
|
||||
-- the calls to `splits`
|
||||
|
||||
parameters (mode : EqMode)
|
||||
private
|
||||
fromInner : Eff EqualInner a -> Eff Equal a
|
||||
|
|
|
@ -178,8 +178,7 @@ mn base = do
|
|||
modifyAt GEN S
|
||||
pure $ MN base i
|
||||
|
||||
||| generate a fresh binding name with the given base and
|
||||
||| (optionally) location `loc`
|
||||
||| generate a fresh binding name with the given base and location `loc`
|
||||
export
|
||||
mnb : Has NameGen fs => PBaseName -> Loc -> Eff fs BindName
|
||||
mnb base loc = pure $ BN !(mn base) loc
|
||||
|
|
Loading…
Reference in a new issue