Fix/array storage type item constraints

lib/ash/type/type.ex

@@ -914,7 +914,10 @@ defmodule Ash.Type do
   """
   @spec storage_type(t()) :: Ecto.Type.t()
   def storage_type(type, constraints \\ [])
-  def storage_type({:array, type}, constraints), do: {:array, storage_type(type, constraints)}
+
+  def storage_type({:array, type}, constraints),
+    do: {:array, storage_type(type, item_constraints(constraints))}
+
   def storage_type(type, constraints), do: type.storage_type(constraints)
 
   @doc """

test/type/type_test.exs

@@ -8,6 +8,17 @@ defmodule Ash.Test.Type.TypeTest do
 
   alias Ash.Test.Domain, as: Domain
 
+  defmodule StorageByConstraint do
+    @moduledoc false
+    use Ash.Type
+
+    def storage_type(constraints), do: if(constraints[:as_binary], do: :binary, else: :string)
+
+    def cast_input(value, _), do: {:ok, value}
+    def cast_stored(value, _), do: {:ok, value}
+    def dump_to_native(value, _), do: {:ok, value}
+  end
+
   defmodule PostTitle do
     @moduledoc false
     use Ash.Type
@@ -91,6 +102,14 @@ defmodule Ash.Test.Type.TypeTest do
     end)
   end
 
+  test "storage_type/2 forwards item constraints to inner type for array types" do
+    assert {:array, :binary} =
+             Ash.Type.storage_type({:array, StorageByConstraint}, items: [as_binary: true])
+
+    assert {:array, :string} =
+             Ash.Type.storage_type({:array, StorageByConstraint}, [])
+  end
+
   test "returns error for invalid keys" do
     foo = {:foo, [type: :string]}
     bar = {:bar, [type: :integer]}