diff options
Diffstat (limited to 'lib/patterns/patterns.tm')
| -rw-r--r-- | lib/patterns/patterns.tm | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/lib/patterns/patterns.tm b/lib/patterns/patterns.tm index c5444b86..f62c6be0 100644 --- a/lib/patterns/patterns.tm +++ b/lib/patterns/patterns.tm @@ -4,7 +4,7 @@ struct PatternMatch(text:Text, index:Int, captures:[Text]) lang Pat convert(text:Text -> Pat) - return C_code:Pat(Pattern$escape_text(@text)) + return C_code:Pat`Pattern$escape_text(@text)` convert(n:Int -> Pat) return Pat.from_text("$n") @@ -12,45 +12,45 @@ lang Pat extend Text func matching_pattern(text:Text, pattern:Pat, pos:Int = 1 -> PatternMatch?) result : PatternMatch - if C_code:Bool(Pattern$match_at(@text, @pattern, @pos, (void*)&@result)) + if C_code:Bool`Pattern$match_at(@text, @pattern, @pos, (void*)&@result)` return result return none func matches_pattern(text:Text, pattern:Pat -> Bool) - return C_code:Bool(Pattern$matches(@text, @pattern)) + return C_code:Bool`Pattern$matches(@text, @pattern)` func pattern_captures(text:Text, pattern:Pat -> [Text]?) - return C_code:[Text]?(Pattern$captures(@text, @pattern)) + return C_code:[Text]?`Pattern$captures(@text, @pattern)` func replace_pattern(text:Text, pattern:Pat, replacement:Text, backref="@", recursive=yes -> Text) - return C_code:Text(Pattern$replace(@text, @pattern, @replacement, @backref, @recursive)) + return C_code:Text`Pattern$replace(@text, @pattern, @replacement, @backref, @recursive)` func translate_patterns(text:Text, replacements:{Pat=Text}, backref="@", recursive=yes -> Text) - return C_code:Text(Pattern$replace_all(@text, @replacements, @backref, @recursive)) + return C_code:Text`Pattern$replace_all(@text, @replacements, @backref, @recursive)` func has_pattern(text:Text, pattern:Pat -> Bool) - return C_code:Bool(Pattern$has(@text, @pattern)) + return C_code:Bool`Pattern$has(@text, @pattern)` func find_patterns(text:Text, pattern:Pat -> [PatternMatch]) - return C_code:[PatternMatch](Pattern$find_all(@text, @pattern)) + return C_code:[PatternMatch]`Pattern$find_all(@text, @pattern)` func by_pattern(text:Text, pattern:Pat -> func(->PatternMatch?)) - return C_code:func(->PatternMatch?)(Pattern$by_match(@text, @pattern)) + return C_code:func(->PatternMatch?)`Pattern$by_match(@text, @pattern)` func each_pattern(text:Text, pattern:Pat, fn:func(m:PatternMatch), recursive=yes) - C_code { Pattern$each(@text, @pattern, @fn, @recursive); } + C_code `Pattern$each(@text, @pattern, @fn, @recursive);` func map_pattern(text:Text, pattern:Pat, fn:func(m:PatternMatch -> Text), recursive=yes -> Text) - return C_code:Text(Pattern$map(@text, @pattern, @fn, @recursive)) + return C_code:Text`Pattern$map(@text, @pattern, @fn, @recursive)` func split_pattern(text:Text, pattern:Pat -> [Text]) - return C_code:[Text](Pattern$split(@text, @pattern)) + return C_code:[Text]`Pattern$split(@text, @pattern)` func by_pattern_split(text:Text, pattern:Pat -> func(->Text?)) - return C_code:func(->Text?)(Pattern$by_split(@text, @pattern)) + return C_code:func(->Text?)`Pattern$by_split(@text, @pattern)` func trim_pattern(text:Text, pattern=$Pat"{space}", left=yes, right=yes -> Text) - return C_code:Text(Pattern$trim(@text, @pattern, @left, @right)) + return C_code:Text`Pattern$trim(@text, @pattern, @left, @right)` func main() >> "Hello world".matching_pattern($Pat'{id}') |