diff options
Diffstat (limited to 'examples/patterns/patterns.tm')
| -rw-r--r-- | examples/patterns/patterns.tm | 36 |
1 files changed, 15 insertions, 21 deletions
diff --git a/examples/patterns/patterns.tm b/examples/patterns/patterns.tm index 5e9ebe69..8ca5faa2 100644 --- a/examples/patterns/patterns.tm +++ b/examples/patterns/patterns.tm @@ -10,49 +10,43 @@ lang Pat: return Pat.from_text("$n") extend Text: - func matches(text:Text, pattern:Pat -> [Text]?): + func matches_pattern(text:Text, pattern:Pat -> [Text]?): return inline C : [Text]? { Pattern$matches(_$text, _$pattern); } - func pat_replace(text:Text, pattern:Pat, replacement:Text, backref="@", recursive=yes -> Text): + func replace_pattern(text:Text, pattern:Pat, replacement:Text, backref="@", recursive=yes -> Text): return inline C : Text { Pattern$replace(_$text, _$pattern, _$replacement, _$backref, _$recursive); } - func pat_replace_all(text:Text, replacements:{Pat,Text}, backref="@", recursive=yes -> Text): + func translate_patterns(text:Text, replacements:{Pat,Text}, backref="@", recursive=yes -> Text): return inline C : Text { Pattern$replace_all(_$text, _$replacements, _$backref, _$recursive); } - func has(text:Text, pattern:Pat -> Bool): + func has_pattern(text:Text, pattern:Pat -> Bool): return inline C : Bool { Pattern$has(_$text, _$pattern); } - func find_all(text:Text, pattern:Pat -> [PatternMatch]): + func find_patterns(text:Text, pattern:Pat -> [PatternMatch]): return inline C : [PatternMatch] { Pattern$find_all(_$text, _$pattern); } - func by_match(text:Text, pattern:Pat -> func(->PatternMatch?)): + func by_pattern(text:Text, pattern:Pat -> func(->PatternMatch?)): return inline C : func(->PatternMatch?) { Pattern$by_match(_$text, _$pattern); } - func each(text:Text, pattern:Pat, fn:func(m:PatternMatch), recursive=yes): + func each_pattern(text:Text, pattern:Pat, fn:func(m:PatternMatch), recursive=yes): inline C { Pattern$each(_$text, _$pattern, _$fn, _$recursive); } - func map(text:Text, pattern:Pat, fn:func(m:PatternMatch -> Text), recursive=yes -> Text): + func map_pattern(text:Text, pattern:Pat, fn:func(m:PatternMatch -> Text), recursive=yes -> Text): return inline C : Text { Pattern$map(_$text, _$pattern, _$fn, _$recursive); } - func split(text:Text, pattern:Pat -> [Text]): + func split_pattern(text:Text, pattern:Pat -> [Text]): return inline C : [Text] { Pattern$split(_$text, _$pattern); } - func by_split(text:Text, pattern:Pat -> func(->Text?)): + func by_pattern_split(text:Text, pattern:Pat -> func(->Text?)): return inline C : func(->Text?) { Pattern$by_split(_$text, _$pattern); } - func trim(text:Text, pattern:Pat, trim_left=yes, trim_right=yes -> Text): - return inline C : Text { Pattern$trim(_$text, _$pattern, _$trim_left, _$trim_right); } - - func trim_left(text:Text, pattern:Pat -> Text): - return text:trim(pattern, trim_left=yes, trim_right=no) - - func trim_right(text:Text, pattern:Pat -> Text): - return text:trim(pattern, trim_left=no, trim_right=yes) + func trim_pattern(text:Text, pattern=$Pat"{space}", left=yes, right=yes -> Text): + return inline C : Text { Pattern$trim(_$text, _$pattern, _$left, _$right); } func main(): - >> "hello world":pat_replace($Pat/{id}/, "XXX") - >> "hello world":find_all($Pat/l/) + >> "hello world":replace_pattern($Pat/{id}/, "XXX") + >> "hello world":find_patterns($Pat/l/) - for m in "hello one two three":by_match($Pat/{id}/): + for m in "hello one two three":by_pattern($Pat/{id}/): >> m |