max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

chore: generalize signatures

Browse source
This commit is contained in:
Leonardo de Moura 2021-08-30 07:05:27 -07:00
parent 34d8ecc066
commit 02224548d2
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Lean/Meta/Match/MatcherInfo.lean
View file

@ -67,10 +67,10 @@ end Match
export Match (MatcherInfo)
def getMatcherInfo? (declName : Name) : MetaM (Option MatcherInfo) :=
def getMatcherInfo? [Monad m] [MonadEnv m] (declName : Name) : m (Option MatcherInfo) :=
return Match.Extension.getMatcherInfo? (← getEnv) declName
def isMatcher (declName : Name) : MetaM Bool :=
def isMatcher [Monad m] [MonadEnv m] (declName : Name) : m Bool :=
return (← getMatcherInfo? declName).isSome
structure MatcherApp where