Made extension-definition macros specify their bindings the same way as syntax:.

4 files changed, 8 insertions, 8 deletions

diff --git a/stdlib/source/library/lux/world/db/sql.lux b/stdlib/source/library/lux/world/db/sql.lux
index ce9842b8d..a3b7aff6a 100644
--- a/stdlib/source/library/lux/world/db/sql.lux
+++ b/stdlib/source/library/lux/world/db/sql.lux
@@ -109,7 +109,7 @@
   (def: listing
     (-> (List (SQL Any)) Text)
     (|>> (list\map (|>> :representation))
-         (text.join_with ", ")))
+         (text.interposed ", ")))
 
   ... Value
   (def: .public ? Placeholder (:abstraction "?"))
@@ -219,7 +219,7 @@
                                   (if (text\= ..no_alias alias)
                                     (:representation column)
                                     (format (:representation column) " AS " alias))))
-                      (text.join_with ", ")))
+                      (text.interposed ", ")))
                 " FROM " (:representation source))))]
 
 
@@ -298,7 +298,7 @@
                (|> pairs
                    (list\map (.function (_ [value order])
                                (format (:representation value) " " (:representation order))))
-                   (text.join_with ", "))))))
+                   (text.interposed ", "))))))
 
   (def: .public (group_by pairs query)
     (All [where having order limit offset]
@@ -324,7 +324,7 @@
              " VALUES "
              (|> rows
                  (list\map (|>> ..listing ..parenthesize))
-                 (text.join_with ", "))
+                 (text.interposed ", "))
              )))
 
   (def: .public (update table pairs)
@@ -338,7 +338,7 @@
                             (format " SET " (|> pairs
                                                 (list\map (.function (_ [column value])
                                                             (format (:representation column) "=" (:representation value))))
-                                                (text.join_with ", ")))))))
+                                                (text.interposed ", ")))))))
 
   (def: .public delete
     (-> Table (Command No_Where No_Having))
diff --git a/stdlib/source/library/lux/world/net/http/request.lux b/stdlib/source/library/lux/world/net/http/request.lux
index 5c8d162c6..6d9e94b8e 100644
--- a/stdlib/source/library/lux/world/net/http/request.lux
+++ b/stdlib/source/library/lux/world/net/http/request.lux
@@ -31,7 +31,7 @@
 
 (def: (merge inputs)
   (-> (List Binary) Binary)
-  (let [[_ output] (try.assumed
+  (let [[_ output] (try.trusted
                     (monad.fold try.monad
                                 (function (_ input [offset output])
                                   (let [amount (binary.size input)]
diff --git a/stdlib/source/library/lux/world/net/http/route.lux b/stdlib/source/library/lux/world/net/http/route.lux
index d9519a95d..a650f53d2 100644
--- a/stdlib/source/library/lux/world/net/http/route.lux
+++ b/stdlib/source/library/lux/world/net/http/route.lux
@@ -58,7 +58,7 @@
       (server [identification
                protocol
                (update@ #//.uri
-                        (|>> (text.clip' (text.size path)) maybe.assume)
+                        (|>> (text.clip' (text.size path)) maybe.trusted)
                         resource)
                message])
       (async.resolved //response.not_found))))
diff --git a/stdlib/source/library/lux/world/program.lux b/stdlib/source/library/lux/world/program.lux
index d5195e39f..05f9cd8a6 100644
--- a/stdlib/source/library/lux/world/program.lux
+++ b/stdlib/source/library/lux/world/program.lux
@@ -319,7 +319,7 @@
                             (#.Some process/env)
                             (|> (Object::entries [process/env])
                                 array.list
-                                (list\map (|>> (array.read! 0) maybe.assume)))
+                                (list\map (|>> (array.read! 0) maybe.trusted)))
 
                             #.None
                             (list))