diff --git a/lib/properties.ex b/lib/properties.ex index 2c2b676..6c82d5e 100644 --- a/lib/properties.ex +++ b/lib/properties.ex @@ -114,7 +114,7 @@ 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 +367,7 @@ 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")