File tree Expand file tree Collapse file tree 2 files changed +4
-4
lines changed
Expand file tree Collapse file tree 2 files changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -91,7 +91,7 @@ meta def removeDollar : Name → Option Name
9191 | anonymous => none
9292 | str anonymous "$" => some anonymous
9393 | str anonymous s =>
94- if s.startsWith "$" then str anonymous (s.drop 1 ) else none
94+ if s.startsWith "$" then str anonymous (s.drop 1 ).copy else none
9595 | str n s => (removeDollar n).map (str . s)
9696 | num n i => (removeDollar n).map (num . i)
9797
@@ -100,8 +100,8 @@ meta def stripDollars : Name → Name
100100 | anonymous => anonymous
101101 | str n "$" => stripDollars n
102102 | str anonymous s =>
103- let s := s.dropWhile (· = '$' )
104- if s = "" then anonymous else str anonymous s
103+ let s := s.dropWhile '$'
104+ if s.isEmpty then anonymous else str anonymous s.copy
105105 | str n s => str (stripDollars n) s
106106 | num n i => num (stripDollars n) i
107107
Original file line number Diff line number Diff line change 1- leanprover/lean4:v4.26.0-rc1
1+ leanprover/lean4-pr-releases:pr-release-11180-fd4047c
You can’t perform that action at this time.
0 commit comments