rename map2 to decodeRecord

roc-lang · Aug 2, 2024 · f0e6406 · f0e6406
1 parent 9c7d5d3
commit f0e6406
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/examples/sqlite3.roc b/examples/sqlite3.roc
@@ -24,7 +24,7 @@ main = \_ ->
     body =
         rows
         |> List.map \{ id, task } ->
-            "row $(Num.toStr id), task: $(task)"
+            "row $(Num.toStr id), task: $(task)\n"
         |> Str.joinWith "\n"
     # Print out the results
     Stdout.line! body
@@ -43,7 +43,7 @@ queryTodosByStatus = \dbPath, status ->
     }
     SQLite3.execute!
         stmt
-        { SQLite3.map2 <-
+        { SQLite3.decodeRecord <-
             id: SQLite3.i64 "id",
             task: SQLite3.str "task",
         }
diff --git a/platform/SQLite3.roc b/platform/SQLite3.roc
@@ -8,7 +8,7 @@ module [
     prepareAndBind,
     execute,
     errToStr,
-    map2,
+    decodeRecord,
     taggedValue,
     str,
     bytes,
@@ -105,8 +105,8 @@ reset = \@Stmt stmt ->
 DecodeErr err : [FieldNotFound Str, SQLError Code Str]err
 Decode a err := List Str -> (Stmt -> Task a (DecodeErr err))
 
-map2 : Decode a err, Decode b err, (a, b -> c) -> Decode c err
-map2 = \@Decode genFirst, @Decode genSecond, mapper ->
+decodeRecord : Decode a err, Decode b err, (a, b -> c) -> Decode c err
+decodeRecord = \@Decode genFirst, @Decode genSecond, mapper ->
     cols <- @Decode
     decodeFirst = genFirst cols
     decodeSecond = genSecond cols