perf: reduce Lean.Parser.Basic imports
This commit is contained in:
parent
e5891850a7
commit
6a767a66a1
2 changed files with 3 additions and 6 deletions
|
|
@ -8,10 +8,7 @@ import Lean.Data.Position
|
|||
import Lean.Syntax
|
||||
import Lean.ToExpr
|
||||
import Lean.Environment
|
||||
import Lean.Attributes
|
||||
import Lean.Message
|
||||
import Lean.Compiler.InitAttr
|
||||
import Lean.ResolveName
|
||||
|
||||
/-!
|
||||
# Basic Lean parser infrastructure
|
||||
|
|
@ -135,9 +132,6 @@ structure ParserContext extends InputContext, ParserModuleContext where
|
|||
savedPos? : Option String.Pos := none
|
||||
forbiddenTk? : Option Token := none
|
||||
|
||||
def ParserContext.resolveName (ctx : ParserContext) (id : Name) : List (Name × List String) :=
|
||||
ResolveName.resolveGlobalName ctx.env ctx.currNamespace ctx.openDecls id
|
||||
|
||||
structure Error where
|
||||
unexpected : String := ""
|
||||
expected : List String := []
|
||||
|
|
|
|||
|
|
@ -622,6 +622,9 @@ def withOpenDeclFn (p : ParserFn) : ParserFn := fun c s =>
|
|||
fn := withOpenDeclFn p.fn
|
||||
}
|
||||
|
||||
def ParserContext.resolveName (ctx : ParserContext) (id : Name) : List (Name × List String) :=
|
||||
ResolveName.resolveGlobalName ctx.env ctx.currNamespace ctx.openDecls id
|
||||
|
||||
def parserOfStackFn (offset : Nat) : ParserFn := fun ctx s => Id.run do
|
||||
let stack := s.stxStack
|
||||
if stack.size < offset + 1 then
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue