chore: remove temporary hacks
This commit is contained in:
parent
a96e5d4bcd
commit
17d4117637
2 changed files with 1 additions and 2 deletions
|
|
@ -87,7 +87,6 @@ def throwUnknownParserCategory {α} (catName : Name) : ExceptT String Id α :=
|
|||
throw ("unknown parser category '" ++ toString catName ++ "'")
|
||||
|
||||
abbrev getCategory (categories : ParserCategories) (catName : Name) : Option ParserCategory :=
|
||||
let catName := if catName == `syntax then `stx else catName; -- temporary hack
|
||||
categories.find? catName
|
||||
|
||||
def addLeadingParser (categories : ParserCategories) (catName : Name) (parserName : Name) (p : Parser) : Except String ParserCategories :=
|
||||
|
|
|
|||
|
|
@ -133,6 +133,6 @@ new_frontend
|
|||
|
||||
namespace Lean
|
||||
|
||||
-- macro:max "trace!" id:term:max msg:term : term => `(trace $id fun _ => ($msg : MessageData))
|
||||
macro:max "trace!" id:term:max msg:term : term => `(trace $id fun _ => ($msg : MessageData))
|
||||
|
||||
end Lean
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue