From 6138cd5efdf4f4de7b6c4d2694a0cdb40668869d Mon Sep 17 00:00:00 2001
From: Alexandre Hamez <199517+ahamez@users.noreply.github.com>
Date: Thu, 13 Jun 2024 16:15:57 +0200
Subject: [PATCH] fix: use ExUnit.Case.register_test/6

ExUnit.Case.register_test/4 is deprecated since Elixir 1.12
---
 lib/properties.ex | 21 +++++++++++++++++++--
 1 file changed, 19 insertions(+), 2 deletions(-)

diff --git a/lib/properties.ex b/lib/properties.ex
index 2c2b676..17812b1 100644
--- a/lib/properties.ex
+++ b/lib/properties.ex
@@ -114,7 +114,16 @@ defmodule PropCheck.Properties do
 
       # @tag failing_prop: tag_property({module, prop_name, []})
       tags = [[failing_prop: tag_property({module, name, []})]]
-      prop_name = ExUnit.Case.register_test(__ENV__, :property, name, tags)
+
+      prop_name =
+        ExUnit.Case.register_test(
+          __ENV__.module,
+          __ENV__.file,
+          __ENV__.line,
+          :property,
+          name,
+          tags
+        )
 
       def unquote(prop_name)(unquote(var)) do
         {:ok, output_agent} = PropCheck.OutputAgent.start_link()
@@ -367,7 +376,15 @@ defmodule PropCheck.Properties do
   """
   defmacro property(message) do
     quote bind_quoted: [message: message] do
-      prop_name = ExUnit.Case.register_test(__ENV__, :property, message, [:not_implemented])
+      prop_name =
+        ExUnit.Case.register_test(
+          __ENV__.module,
+          __ENV__.file,
+          __ENV__.line,
+          :property,
+          message,
+          [:not_implemented]
+        )
 
       def unquote(prop_name)(_) do
         flunk("Not implemented")