diff options
author | Björn Gustavsson <[email protected]> | 2017-12-07 10:07:25 +0100 |
---|---|---|
committer | GitHub <[email protected]> | 2017-12-07 10:07:25 +0100 |
commit | 71bb60815630574bf710b8ce8a7d3b0e48b5a985 (patch) | |
tree | dd8bb2e46c8e82c6190233f2c84a8bbe7471466b /lib/compiler/test/receive_SUITE.erl | |
parent | be9f93b14e0fb9ff09db36abde62ae8099bf5bd0 (diff) | |
parent | f33b4f5cf611472c631c30e8d6bbde83f2fb2058 (diff) | |
download | otp-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.erl | 8 |
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), |