opaque Lean.protectedExt : Lean.TagDeclarationExtension

def Lean.addProtected (env : Lean.Environment) (n : Lean.Name) : Lean.Environment

Equations

• Lean.addProtected env n = Lean.protectedExt.tag env n

def Lean.isProtected (env : Lean.Environment) (n : Lean.Name) : Bool

Private name support.

Suppose the user marks as declaration n as private. Then, we create the name: _private.<module_name>.0 ++ n. We say _private.<module_name>.0 is the "private prefix"

We assume that n is a valid user name and does not contain Name.num constructors. Thus, we can easily convert from private internal name to the user given name.

def Lean.privateHeader : Lean.Name

Equations

• Lean.privateHeader = `_private

def Lean.mkPrivateName (env : Lean.Environment) (n : Lean.Name) : Lean.Name

Equations

• Lean.mkPrivateName env n = (Lean.privateHeader ++ env.mainModule).mkNum 0 ++ n

def Lean.isPrivateName : Lean.Name → Bool

@[export lean_is_private_name]

def Lean.isPrivateNameExport (n : Lean.Name) : Bool

Equations

• Lean.isPrivateNameExport n = Lean.isPrivateName n

def Lean.isPrivatePrefix (n : Lean.Name) : Bool

Return true if n is of the form _private.<module_name>.0 See comment above.

def Lean.isPrivatePrefix.go (n : Lean.Name) : Bool

@[export lean_private_to_user_name]

def Lean.privateToUserName? (n : Lean.Name) : Option Lean.Name

Equations

• Lean.privateToUserName? n = if Lean.isPrivateName n = true then some (Lean.privateToUserNameAux✝ n) else none

def Lean.isPrivateNameFromImportedModule (env : Lean.Environment) (n : Lean.Name) : Bool

@[export lean_private_prefix]

def Lean.privatePrefix? (n : Lean.Name) : Option Lean.Name