Merge pull request #10228 from richcarl/to_abstr-flag

compiler: Add +to_abstr flag to match +from_abstr

Author: bjorng

lib/compiler/src/compile.erl

@@ -1662,7 +1662,8 @@ standard_passes() ->
      {iff,'P',{src_listing,"P"}},
      {iff,'to_pp',{done,"P"}},
 
-     {iff,'dabstr',{listing,"abstr"}}
+     {iff,'dabstr',{listing,"abstr"}},
+     {iff,'to_abstr',{done,"abstr"}}
      | abstr_passes(verified_abstr)].
 
 abstr_passes(AbstrStatus) ->
@@ -1686,7 +1687,7 @@ abstr_passes(AbstrStatus) ->
          {iff,'dexp',{listing,"expand"}},
          {iff,'E',?pass(legalize_vars)},
          {iff,'E',{src_listing,"E"}},
-         {iff,'to_exp',{done,"E"}},
+         {iff,'to_exp',{done,"abstr"}},
 
          %% Conversion to Core Erlang.
          ?pass(core),

lib/compiler/test/compile_SUITE.erl

@@ -552,7 +552,8 @@ do_file_listings(DataDir, PrivDir, [File|Files]) ->
 
     %% Test options that produce a listing file if 'binary' is not given.
     do_listing(Simple, TargetDir, to_pp, ".P"),
-    do_listing(Simple, TargetDir, to_exp, ".E"),
+    do_listing(Simple, TargetDir, to_abstr, ".abstr"),
+    do_listing(Simple, TargetDir, to_exp, ".abstr"),
     do_listing(Simple, TargetDir, to_core0, ".core"),
     ok = file:delete(filename:join(TargetDir, File ++ ".core")),
     do_listing(Simple, TargetDir, to_core, ".core"),