aniva/Pantograph
aniva
/
Pantograph
1
1
Fork 0
Code Issues 10 Pull Requests 1 Packages Projects Releases 1 Wiki Activity

feat: Handling of private names #36

Merged
aniva merged 6 commits from library/catalog into dev 2023-12-05 20:22:38 -08:00
Conversation 0 Commits 6 Files Changed 6 +1 -5
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit a454aaf1d4 - Show all commits

6
Pantograph/Symbol.lean
View File

@ -6,11 +6,7 @@ def is_symbol_unsafe_or_internal (n: Lean.Name) (info: Lean.ConstantInfo): Bool
let nameDeduce: Bool := match n.getRoot with let nameDeduce: Bool := match n.getRoot with
| .str _ name => name.startsWith "_" ∨ name == "Lean" | .str _ name => name.startsWith "_" ∨ name == "Lean"
| _ => true | _ => true
let stemDeduce: Bool := match n with nameDeduce ∨ info.isUnsafe
| .anonymous => true
| .str _ name => name.startsWith "_"
| .num _ _ => true
nameDeduce ∨ stemDeduce ∨ info.isUnsafe
def to_compact_symbol_name (n: Lean.Name) (info: Lean.ConstantInfo): String := def to_compact_symbol_name (n: Lean.Name) (info: Lean.ConstantInfo): String :=
let pref := match info with let pref := match info with