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

refactor: generalize addMatcherInfo (#5068)

Browse source 
works in any `MonadEnv`.
This commit is contained in:
Joachim Breitner 2024-08-16 08:24:32 +02:00 • committed by GitHub
parent 59ca274296
commit 53e6e99a29
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -92,7 +92,7 @@ def getMatcherInfo? (env : Environment) (declName : Name) : Option MatcherInfo :
end Extension
def addMatcherInfo (matcherName : Name) (info : MatcherInfo) : MetaM Unit :=
def addMatcherInfo [Monad m] [MonadEnv m] (matcherName : Name) (info : MatcherInfo) : m Unit :=
modifyEnv fun env => Extension.addMatcherInfo env matcherName info
end Match