Make standard match bindings not throw unused warnings

plausible · Jan 29, 2025 · 1221960 · 1221960
1 parent f51c117
commit 1221960
Showing 1 changed file with 18 additions and 1 deletion.
diff --git a/test/support/assert_matches.ex b/test/support/assert_matches.ex
@@ -68,7 +68,11 @@ defmodule Plausible.AssertMatches do
 
         {:^, _meta, [pinned]}, acc ->
           pinned = Plausible.AssertMatches.Internal.transform_predicate(pinned)
-          pinned_var = Macro.unique_var(:match, __MODULE__)
+
+          pinned_var =
+            Macro.unique_var(:match, __MODULE__)
+            |> Macro.update_meta(&Keyword.put(&1, :assert_match, true))
+
           {pinned_var, [{pinned_var, pinned} | acc]}
 
         other, acc ->
@@ -83,6 +87,19 @@ defmodule Plausible.AssertMatches do
         end)
       end)
 
+    var_pattern =
+      Macro.postwalk(var_pattern, fn
+        {name, meta, module} = var when is_atom(name) and is_atom(module) ->
+          if meta[:assert_match] do
+            var
+          else
+            {:_, [], __MODULE__}
+          end
+
+        other ->
+          other
+      end)
+
     predicate_pattern =
       quote bind_quoted: [
               var_pattern: Macro.escape(var_pattern),