feat: add Repr Name
This commit is contained in:
parent
d22c5cb1b0
commit
68701b86e4
1 changed files with 5 additions and 1 deletions
|
|
@ -49,7 +49,11 @@ def toStringWithSep (sep : String) : Name → String
|
|||
protected def toString : Name → String :=
|
||||
toStringWithSep "."
|
||||
|
||||
instance : ToString Name := ⟨Name.toString⟩
|
||||
instance : ToString Name where
|
||||
toString n := n.toString
|
||||
|
||||
instance : Repr Name where
|
||||
reprPrec n _ := Std.Format.text "`" ++ n.toString
|
||||
|
||||
def capitalize : Name → Name
|
||||
| Name.str p s _ => Name.mkStr p s.capitalize
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue