refactor: rename ref to declName

This commit is contained in:
Mario Carneiro 2022-08-01 04:19:39 -04:00 committed by Sebastian Ullrich
parent 76eddb06a5
commit ecb787529a
2 changed files with 5 additions and 5 deletions

View file

@ -1612,7 +1612,7 @@ inductive LeadingIdentBehavior where
The method `termParser prec` is equivalent to the method above.
-/
structure ParserCategory where
ref : Name
declName : Name
kinds : SyntaxNodeKindSet := {}
tables : PrattParsingTables := {}
behavior : LeadingIdentBehavior

View file

@ -46,9 +46,9 @@ private def addParserCategoryCore (categories : ParserCategories) (catName : Nam
/-- All builtin parser categories are Pratt's parsers -/
private def addBuiltinParserCategory (catName ref : Name) (behavior : LeadingIdentBehavior) : IO Unit := do
private def addBuiltinParserCategory (catName declName : Name) (behavior : LeadingIdentBehavior) : IO Unit := do
let categories ← builtinParserCategoriesRef.get
let categories ← IO.ofExcept $ addParserCategoryCore categories catName { ref, behavior }
let categories ← IO.ofExcept $ addParserCategoryCore categories catName { declName, behavior }
builtinParserCategoriesRef.set categories
namespace ParserExtension
@ -162,10 +162,10 @@ def ParserExtension.addEntryImpl (s : State) (e : Entry) : State :=
| _ => unreachable!
| Entry.kind k =>
{ s with kinds := s.kinds.insert k }
| Entry.category catName ref behavior =>
| Entry.category catName declName behavior =>
if s.categories.contains catName then s
else { s with
categories := s.categories.insert catName { ref, behavior } }
categories := s.categories.insert catName { declName, behavior } }
| Entry.parser catName declName leading parser prio =>
match addParser s.categories catName declName leading parser prio with
| Except.ok categories => { s with categories }