test: add tests for calculation typing

Author: zachdaniel

test/calculation_test.exs

@@ -1034,4 +1034,15 @@ defmodule AshPostgres.CalculationTest do
 
     assert full_name == "name"
   end
+
+  test "calculation with fragment and cond returning integer doesn't cause Postgrex encoding error" do
+    Post
+    |> Ash.Changeset.for_create(:create, %{title: "hello ash lovers"})
+    |> Ash.create!()
+
+    assert [%Post{}] =
+             Post
+             |> Ash.Query.sort("posts_with_matching_title.relevance_score")
+             |> Ash.read!()
+  end
 end

test/support/resources/post.ex

@@ -788,6 +788,24 @@ defmodule AshPostgres.Test.Post do
   end
 
   calculations do
+    calculate :relevance_score,
+              :integer,
+              expr(
+                cond do
+                  fragment(
+                    "ts_rank_cd(to_tsvector(?), ?, 32)::float",
+                    ^ref(:title),
+                    fragment("to_tsquery(?)", ^arg(:query))
+                  ) > 0.6 ->
+                    1
+
+                  true ->
+                    2
+                end
+              ) do
+      argument(:query, :string)
+    end
+
     calculate(:upper_thing, :string, expr(fragment("UPPER(?)", uniq_on_upper)))
 
     calculate(:upper_title, :string, expr(fragment("UPPER(?)", title)))