Merge pull request #21 from lukewilliamboswell/syntax-updates

Remove backpassing
lukewilliamboswell · Aug 25, 2024 · 00a1df9 · 00a1df9
2 parents 218d7ae + 21eab6b
commit 00a1df9
Show file tree

Hide file tree

Showing 6 changed files with 7 additions and 7 deletions.
diff --git a/examples/csv-movies.roc b/examples/csv-movies.roc
@@ -1,5 +1,5 @@
 app [main] {
-    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.10.0/vNe6s9hWzoTZtFmNkvEICPErI9ptji_ySjicO6CkucY.tar.br",
+    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.14.0/dC5ceT962N_4jmoyoffVdphJ_4GlW3YMhAPyGPr-nU0.tar.br",
     parser: "../package/main.roc",
 }
 

diff --git a/examples/letters.roc b/examples/letters.roc
@@ -1,5 +1,5 @@
 app [main] {
-    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.10.0/vNe6s9hWzoTZtFmNkvEICPErI9ptji_ySjicO6CkucY.tar.br",
+    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.14.0/dC5ceT962N_4jmoyoffVdphJ_4GlW3YMhAPyGPr-nU0.tar.br",
     parser: "../package/main.roc",
 }
 

diff --git a/examples/markdown.roc b/examples/markdown.roc
@@ -1,5 +1,5 @@
 app [main] {
-    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.10.0/vNe6s9hWzoTZtFmNkvEICPErI9ptji_ySjicO6CkucY.tar.br",
+    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.14.0/dC5ceT962N_4jmoyoffVdphJ_4GlW3YMhAPyGPr-nU0.tar.br",
     parser: "../package/main.roc",
 }
 

diff --git a/examples/numbers.roc b/examples/numbers.roc
@@ -1,5 +1,5 @@
 app [main] {
-    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.10.0/vNe6s9hWzoTZtFmNkvEICPErI9ptji_ySjicO6CkucY.tar.br",
+    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.14.0/dC5ceT962N_4jmoyoffVdphJ_4GlW3YMhAPyGPr-nU0.tar.br",
     parser: "../package/main.roc",
 }
 

diff --git a/examples/xml-svg.roc b/examples/xml-svg.roc
@@ -1,5 +1,5 @@
 app [main] {
-    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.10.0/vNe6s9hWzoTZtFmNkvEICPErI9ptji_ySjicO6CkucY.tar.br",
+    cli: platform "https://github.com/roc-lang/basic-cli/releases/download/0.14.0/dC5ceT962N_4jmoyoffVdphJ_4GlW3YMhAPyGPr-nU0.tar.br",
     html: "https://github.com/Hasnep/roc-html/releases/download/v0.6.0/IOyNfA4U_bCVBihrs95US9Tf5PGAWh3qvrBN4DRbK5c.tar.br",
     parser: "../package/main.roc",
 }

diff --git a/package/Core.roc b/package/Core.roc
@@ -194,7 +194,7 @@ alt = \first, second ->
 apply : Parser input (a -> b), Parser input a -> Parser input b
 apply = \funParser, valParser ->
     combined = \input ->
-        { val: funVal, input: rest } <- Result.try (parsePartial funParser input)
+        { val: funVal, input: rest } = parsePartial? funParser input
         parsePartial valParser rest
         |> Result.map \{ val: val, input: rest2 } ->
             { val: funVal val, input: rest2 }
@@ -213,7 +213,7 @@ apply = \funParser, valParser ->
 andThen : Parser input a, (a -> Parser input b) -> Parser input b
 andThen = \firstParser, buildNextParser ->
     fun = \input ->
-        { val: firstVal, input: rest } <- Result.try (parsePartial firstParser input)
+        { val: firstVal, input: rest } = parsePartial? firstParser input
         nextParser = buildNextParser firstVal
 
         parsePartial nextParser rest