diff options
| author | Sverker Eriksson <[email protected]> | 2019-03-07 20:48:02 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2019-03-07 20:48:02 +0100 |
| commit | 8e323b5c6cbc2ffc8f8f8883daaaf419144c35f1 (patch) | |
| tree | d6abeb81266f833e781ac7af28fdf6157cef789a /erts/emulator/beam/erl_bif_info.c | |
| parent | 1e05aaf67fdf7547d72e20ff5a272ad8912f9ae0 (diff) | |
| parent | 8dec35910330a44de3fa08573e3029f10b3aa4ae (diff) | |
| download | otp-8e323b5c6cbc2ffc8f8f8883daaaf419144c35f1.tar.gz otp-8e323b5c6cbc2ffc8f8f8883daaaf419144c35f1.tar.bz2 otp-8e323b5c6cbc2ffc8f8f8883daaaf419144c35f1.zip | |
Merge branch 'sverker/ets-no-mbuf-trapping/OTP-15660'
into sverker/maint/ets-no-mbuf-trapping/OTP-15660
Diffstat (limited to 'erts/emulator/beam/erl_bif_info.c')
| -rw-r--r-- | erts/emulator/beam/erl_bif_info.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/erts/emulator/beam/erl_bif_info.c b/erts/emulator/beam/erl_bif_info.c index f6a98c85fd..16c06766fb 100644 --- a/erts/emulator/beam/erl_bif_info.c +++ b/erts/emulator/beam/erl_bif_info.c @@ -4674,6 +4674,16 @@ BIF_RETTYPE erts_debug_set_internal_state_2(BIF_ALIST_2) BIF_RET(am_notsup); #endif } + else if (ERTS_IS_ATOM_STR("mbuf", BIF_ARG_1)) { + Uint sz = size_object(BIF_ARG_2); + ErlHeapFragment* frag = new_message_buffer(sz); + Eterm *hp = frag->mem; + Eterm copy = copy_struct(BIF_ARG_2, sz, &hp, &frag->off_heap); + frag->next = BIF_P->mbuf; + BIF_P->mbuf = frag; + BIF_P->mbuf_sz += sz; + BIF_RET(copy); + } } BIF_ERROR(BIF_P, BADARG); |