1 files changed, 12 insertions, 2 deletions
diff --git a/lib/compiler/test/map_SUITE.erl b/lib/compiler/test/map_SUITE.erl
index 3d7a4e445a..440b632381 100644
--- a/lib/compiler/test/map_SUITE.erl
+++ b/lib/compiler/test/map_SUITE.erl
@@ -73,7 +73,7 @@
         t_reused_key_variable/1,
 
         %% new in OTP 22
-        t_mixed_clause/1
+        t_mixed_clause/1,cover_beam_trim/1
     ]).
 
 suite() -> [].
@@ -130,7 +130,7 @@ all() ->
         t_reused_key_variable,
 
         %% new in OTP 22
-        t_mixed_clause
+        t_mixed_clause,cover_beam_trim
     ].
 
 groups() -> [].
@@ -2182,6 +2182,16 @@ t_mixed_clause(_Config) ->
               end,
     ok.
 
+cover_beam_trim(_Config) ->
+    val = do_cover_beam_trim(id, max, max, id, #{id=>val}),
+    ok.
+
+do_cover_beam_trim(Id, OldMax, Max, Id, M) ->
+    OldMax = id(Max),
+    #{Id:=Val} = id(M),
+    Val.
+
+
 %% aux
 
 rand_terms(0) -> [];