Iterate over groups with the new MARK AS step

VERSION

@@ -1 +1 @@
-10.0.0-rc18
+10.0.0-rc19

farmbot_celery_script/lib/farmbot_celery_script/compilers/sequence_compiler.ex

@@ -30,8 +30,7 @@ defmodule FarmbotCeleryScript.Compiler.Sequence do
   def compile_sequence_iterable(
         iterable_ast,
         %{
-          args:
+          args: %{locals: %{body: _} = locals} = sequence_args,
-            %{ locals: %{ body: _ } = locals } = sequence_args,
           meta: sequence_meta
         } = sequence_ast,
         env
@@ -114,9 +113,11 @@ defmodule FarmbotCeleryScript.Compiler.Sequence do
   end
 
   def create_better_params(body, env) do
-    parameter_declarations = Enum.reduce(env, %{}, fn
+    parameter_declarations =
+      Enum.reduce(env, %{}, fn
         {key, value}, map ->
           encoded_label = "#{key}"
+
           if String.starts_with?(encoded_label, "unsafe_") do
             Map.put(map, IdentifierSanitizer.to_string(encoded_label), value)
           else
@@ -126,13 +127,18 @@ defmodule FarmbotCeleryScript.Compiler.Sequence do
 
     Enum.reduce(body, parameter_declarations, fn ast, map ->
       case ast do
+        %{kind: :parameter_application} ->
+          args = Map.fetch!(ast, :args)
+          label = Map.fetch!(args, :label)
+          Map.put(map, label, Map.fetch!(args, :data_value))
+
         %{kind: :variable_declaration} ->
           args = Map.fetch!(ast, :args)
           label = Map.fetch!(args, :label)
           Map.put(map, label, Map.fetch!(args, :data_value))
 
-        %{kind: :parameter_declaration} -> map
+        %{kind: :parameter_declaration} ->
-        _ -> raise "How do I compile this? #{inspect(ast)}"
+          map
       end
     end)
   end

farmbot_celery_script/lib/farmbot_celery_script/compilers/update_resource_compiler.ex

@@ -1,5 +1,5 @@
 defmodule FarmbotCeleryScript.Compiler.UpdateResource do
-  alias FarmbotCeleryScript.{ AST, DotProps}
+  alias FarmbotCeleryScript.{AST, DotProps}
 
   def update_resource(%AST{args: args, body: body}, _env) do
     quote location: :keep do
@@ -13,11 +13,15 @@ defmodule FarmbotCeleryScript.Compiler.UpdateResource do
           label = Map.fetch!(args, :label)
           resource = Map.fetch!(better_params, label)
           me.do_update(resource, update)
+
         %AST{kind: :point} ->
           me.do_update(variable.args, update)
+
         %AST{kind: :resource} ->
           me.do_update(variable.args, update)
-        res -> raise "Resource error. Please notfiy support: #{inspect(res)}"
+
+        res ->
+          raise "Resource error. Please notfiy support: #{inspect(res)}"
       end
     end
   end

farmbot_os/lib/farmbot_os/sys_calls/resource_update.ex

@@ -35,9 +35,10 @@ defmodule FarmbotOS.SysCalls.ResourceUpdate do
 
   @doc false
   def point_update_resource(type, id, params) do
-    with %{} = point <- Asset.get_point(pointer_type: type, id: id),
+    with %{} = point <- Asset.get_point(id: id),
          {:ok, point} <- Asset.update_point(point, params) do
       _ = Private.mark_dirty!(point)
+      IO.puts("Updated point #{id}: #{inspect(params)}")
       :ok
     else
       nil ->