From a0ac652cd1eebdc42425b34f1685f8cb20cb4eea Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Sun, 31 Aug 2025 18:03:05 -0400
Subject: Simplify quotes by limiting to `,',"

---
 lib/patterns/patterns.tm | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

(limited to 'lib/patterns/patterns.tm')

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}')
-- 
cgit v1.2.3