Add failing test for a calculation that uses a :struct return type and a constraint with an otherwise unreferenced NewType

Author: skanderm

test/read_test.exs

@@ -1625,4 +1625,34 @@ defmodule AshGraphql.ReadTest do
              } = result
     end
   end
+
+  describe "calculations" do
+    test "loads calculated struct type that uses constraint" do
+      post =
+        AshGraphql.Test.Post
+        |> Ash.Changeset.for_create(:create,
+          text: "a",
+          published: true
+        )
+        |> Ash.create!()
+
+      resp =
+        """
+        query postLibrary {
+          postLibrary(sort: {field: TEXT}) {
+            structCalc {
+              some
+            }
+          }
+        }
+        """
+        |> Absinthe.run(AshGraphql.Test.Schema)
+
+      assert {:ok, result} = resp
+
+      refute Map.has_key?(result, :errors)
+
+      assert %{data: %{"postLibrary" => [%{"structCalc" => %{"some" => "string"}}]}} = result
+    end
+  end
 end

test/support/resources/post.ex

@@ -625,6 +625,16 @@ defmodule AshGraphql.Test.Post do
       end,
       public?: true
     )
+
+    calculate(
+      :struct_calc,
+      :struct,
+      fn records, _ ->
+        Enum.map(records, fn _ -> %{some: "string"} end)
+      end,
+      public?: true,
+      constraints: [instance_of: AshGraphql.Test.UnreferencedStructType]
+    )
   end
 
   aggregates do

test/support/types/unreferenced_type.ex

@@ -0,0 +1,13 @@
+defmodule AshGraphql.Test.UnreferencedType do
+  @moduledoc false
+  use Ash.Type.NewType,
+    subtype_of: :map,
+    constraints: [
+      fields: [
+        some: [
+          type: :string,
+          allow_nil?: false
+        ]
+      ]
+    ]
+end