summaryrefslogtreecommitdiff
path: root/lib/tools/test/cover_SUITE.erl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/tools/test/cover_SUITE.erl')
-rw-r--r--lib/tools/test/cover_SUITE.erl21
1 files changed, 20 insertions, 1 deletions
diff --git a/lib/tools/test/cover_SUITE.erl b/lib/tools/test/cover_SUITE.erl
index 9977fa8763..ac792380a9 100644
--- a/lib/tools/test/cover_SUITE.erl
+++ b/lib/tools/test/cover_SUITE.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 2001-2022. All Rights Reserved.
+%% Copyright Ericsson AB 2001-2023. All Rights Reserved.
%%
%% Licensed under the Apache License, Version 2.0 (the "License");
%% you may not use this file except in compliance with the License.
@@ -1522,6 +1522,25 @@ comprehension_8188(Cf) ->
" <<_>> <= << 1, 2 >>,\n" % 2
" true >>.\n" % 4
"two() -> 2">>, Cf), % 1
+
+ [{{t,1},1},
+ {{t,2},2},
+ {{t,3},2},
+ {{t,5},1},
+ {{t,8},3},
+ {{t,9},2},
+ {{t,10},1}] =
+ analyse_expr(<<"#{\n" %1
+ " K + 1 =>\n" %2
+ "X * 2 ||\n" %2
+ " K := X <-\n"
+ " #{1 => 1,\n" %1
+ " 2 => two(),\n"
+ " 3 => 3},\n"
+ " X > 1,\n" %3
+ " true}. \n" %2
+ " two() -> 2">>, Cf), %1
+
ok.
eep37(Config) when is_list(Config) ->