Expand default compile_env argument in expand literals (#12181)

Author: michallepicki

lib/elixir/lib/macro.ex

@@ -2053,6 +2053,16 @@ defmodule Macro do
     :lists.mapfoldl(&expand_literals(&1, &2, fun), acc, list)
   end
 
+  def expand_literals(
+        {{:., _, [{:__aliases__, _, [:Application]}, :compile_env]} = node, meta,
+         [app, key, default]},
+        acc,
+        fun
+      ) do
+    {default, acc} = expand_literals(default, acc, fun)
+    {{node, meta, [app, key, default]}, acc}
+  end
+
   def expand_literals(term, acc, _fun), do: {term, acc}
 
   @doc """

lib/elixir/test/elixir/kernel/lexical_tracker_test.exs

@@ -226,6 +226,18 @@ defmodule Kernel.LexicalTrackerTest do
 
       assert String in compile
       assert Enum in compile
+
+      {{compile, _, _, _}, _binding} =
+        Code.eval_string("""
+        defmodule Kernel.LexicalTrackerTest.Attribute6 do
+          @example %{foo: Application.compile_env(:elixir, Enum, String)}
+          def foo(atom) when atom == @example.foo, do: atom
+          Kernel.LexicalTracker.references(__ENV__.lexical_tracker)
+        end |> elem(3)
+        """)
+
+      refute String in compile
+      refute Enum in compile
     end
 
     test "@compile adds a runtime dependency" do