Also allow unquoting on setup and teardown callbacks

Author: José Valim

lib/ex_unit/lib/ex_unit/callbacks.ex

@@ -87,31 +87,31 @@ defmodule ExUnit.Callbacks do
   defmacro setup(var // quote(do: _), block) do
     quote do
       name = :"__exunit_setup_#{length(@exunit_setup)}"
-      defp name, [unquote(Macro.escape var)], [], unquote(Macro.escape block)
+      defp name, [unquote(escape var)], [], unquote(escape block)
       @exunit_setup [name|@exunit_setup]
     end
   end
 
   defmacro teardown(var // quote(do: _), block) do
     quote do
       name = :"__exunit_teardown_#{length(@exunit_teardown)}"
-      defp name, [unquote(Macro.escape var)], [], unquote(Macro.escape block)
+      defp name, [unquote(escape var)], [], unquote(escape block)
       @exunit_teardown [name|@exunit_teardown]
     end
   end
 
   defmacro setup_all(var // quote(do: _), block) do
     quote do
       name = :"__exunit_setup_all_#{length(@exunit_setup_all)}"
-      defp name, [unquote(Macro.escape var)], [], unquote(Macro.escape block)
+      defp name, [unquote(escape var)], [], unquote(escape block)
       @exunit_setup_all [name|@exunit_setup_all]
     end
   end
 
   defmacro teardown_all(var // quote(do: _), block) do
     quote do
       name = :"__exunit_teardown_all_#{length(@exunit_teardown_all)}"
-      defp name, [unquote(Macro.escape var)], [], unquote(Macro.escape block)
+      defp name, [unquote(escape var)], [], unquote(escape block)
       @exunit_teardown_all [name|@exunit_teardown_all]
     end
   end
@@ -125,6 +125,10 @@ defmodule ExUnit.Callbacks do
           " or { :ok, data }, got #{inspect failure} instead"
   end
 
+  defp escape(contents) do
+    Macro.escape(contents, escape_unquoted: false)
+  end
+
   defp compile_callbacks(env, kind) do
     callbacks = Module.get_attribute(env.module, kind) |> Enum.reverse