Add quick test to check json serialization

Author: warmwaffles

test/ecto/integration/json_test.exs

@@ -0,0 +1,26 @@
+defmodule Ecto.Integration.JsonTest do
+  use Ecto.Integration.Case
+
+  alias EctoSQLite3.Integration.Setting
+  alias Ecto.Integration.TestRepo
+
+  test "serializes json correctly" do
+    # Insert a record purposefully with atoms as the map key. We are going to
+    # verify later they were coerced into strings.
+    setting =
+      %Setting{}
+      |> Setting.changeset(%{properties: %{foo: "bar", qux: "baz"}})
+      |> TestRepo.insert!()
+
+    # Read the record back using ecto and confirm it
+    assert %Setting{properties: %{"foo" => "bar", "qux" => "baz"}} =
+      TestRepo.get(Setting, setting.id)
+
+    assert %{num_rows: 1, rows: [["bar"]]} =
+      Ecto.Adapters.SQL.query!(
+        TestRepo,
+        "select json_extract(properties, '$.foo') from settings where id = ?1",
+        [setting.id]
+      )
+  end
+end

test/support/migration.ex

@@ -37,5 +37,9 @@ defmodule EctoSQLite3.Integration.Migration do
       add(:y, :float)
       add(:z, :float)
     end
+
+    create table(:settings) do
+      add(:properties, :map)
+    end
   end
 end

test/support/schemas.ex

@@ -112,3 +112,16 @@ defmodule EctoSQLite3.Integration.Vec3f do
     field(:z, :float)
   end
 end
+
+defmodule EctoSQLite3.Integration.Setting do
+  use Ecto.Schema
+  import Ecto.Changeset
+
+  schema "settings" do
+    field(:properties, :map)
+  end
+
+  def changeset(struct, attrs) do
+    cast(struct, attrs, [:properties])
+  end
+end