aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test/receive_SUITE.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2017-12-07 10:07:25 +0100
committerGitHub <[email protected]>2017-12-07 10:07:25 +0100
commit71bb60815630574bf710b8ce8a7d3b0e48b5a985 (patch)
treedd8bb2e46c8e82c6190233f2c84a8bbe7471466b /lib/compiler/test/receive_SUITE.erl
parentbe9f93b14e0fb9ff09db36abde62ae8099bf5bd0 (diff)
parentf33b4f5cf611472c631c30e8d6bbde83f2fb2058 (diff)
downloadotp-71bb60815630574bf710b8ce8a7d3b0e48b5a985.tar.gz
otp-71bb60815630574bf710b8ce8a7d3b0e48b5a985.tar.bz2
otp-71bb60815630574bf710b8ce8a7d3b0e48b5a985.zip
Merge pull request #1652 from bjorng/bjorn/compiler/fix-excessive-allocations/ERL-514
Avoid excessive stack frame allocation OTP-14808
Diffstat (limited to 'lib/compiler/test/receive_SUITE.erl')
-rw-r--r--lib/compiler/test/receive_SUITE.erl8
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/compiler/test/receive_SUITE.erl b/lib/compiler/test/receive_SUITE.erl
index 8304672558..3001bb421b 100644
--- a/lib/compiler/test/receive_SUITE.erl
+++ b/lib/compiler/test/receive_SUITE.erl
@@ -265,6 +265,10 @@ export(Config) when is_list(Config) ->
self() ! {result,Ref,42},
42 = export_1(Ref),
{error,timeout} = export_1(Ref),
+
+ self() ! {result,Ref},
+ {ok,Ref} = export_2(),
+
ok.
export_1(Reference) ->
@@ -281,6 +285,10 @@ export_1(Reference) ->
id({build,self()}),
Result.
+export_2() ->
+ receive {result,Result} -> ok end,
+ {ok,Result}.
+
wait(Config) when is_list(Config) ->
self() ! <<42>>,
<<42>> = wait_1(r, 1, 2),