aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/data/text.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/data/text.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/lux/data/text.lux b/stdlib/source/lux/data/text.lux
index 0fdbb376f..aeaf858cc 100644
--- a/stdlib/source/lux/data/text.lux
+++ b/stdlib/source/lux/data/text.lux
@@ -56,20 +56,20 @@
(-> Text Text (Maybe Nat))
("lux text index" input pattern +0))
-(def: (last-index-of'' part part-size since text)
- (-> Text Nat Nat Text (Maybe Nat))
- (case ("lux text index" text part (n/+ part-size since))
+(def: (last-index-of'' part since text)
+ (-> Text Nat Text (Maybe Nat))
+ (case ("lux text index" text part (n/inc since))
#.None
(#.Some since)
(#.Some since')
- (last-index-of'' part part-size since' text)))
+ (last-index-of'' part since' text)))
(def: #export (last-index-of' part from text)
(-> Text Nat Text (Maybe Nat))
(case ("lux text index" text part from)
(#.Some since)
- (last-index-of'' part ("lux text size" part) since text)
+ (last-index-of'' part since text)
#.None
#.None))
@@ -78,7 +78,7 @@
(-> Text Text (Maybe Nat))
(case ("lux text index" text part +0)
(#.Some since)
- (last-index-of'' part ("lux text size" part) since text)
+ (last-index-of'' part since text)
#.None
#.None))