Implement List.takeFirst

compiler/module/src/low_level.rs

@@ -42,6 +42,7 @@ pub enum LowLevel {
     ListKeepOks,
     ListKeepErrs,
     ListSortWith,
+    ListTakeFirst,
     ListDrop,
     ListDropAt,
     ListSwap,
@@ -131,6 +132,7 @@ macro_rules! first_order {
             | ListLen
             | ListGetUnsafe
             | ListSet
+            | ListTakeFirst
             | ListDrop
             | ListDropAt
             | ListSingle

compiler/module/src/symbol.rs

@@ -1065,6 +1065,7 @@ define_builtins! {
         42 LIST_JOIN_MAP: "joinMap"
         43 LIST_JOIN_MAP_CONCAT: "#joinMapConcat"
         44 LIST_ANY: "any"
+        45 LIST_TAKE_FIRST: "takeFirst"
     }
     5 RESULT: "Result" => {
         0 RESULT_RESULT: "Result" imported // the Result.Result type alias