diff options
| author | Sverker Eriksson <[email protected]> | 2017-03-09 16:23:04 +0100 |
|---|---|---|
| committer | Guilherme Andrade <[email protected]> | 2017-03-22 23:57:55 +0000 |
| commit | 5e18e917f29ed46caffa1211eb52ade01d24366a (patch) | |
| tree | e38aba943e590b5b9f18173d79493d4b0c2a257b /erts/emulator/beam/erl_db_util.c | |
| parent | 865f06f93db7a68533bbdc4c961dd45699d6a07f (diff) | |
| download | otp-5e18e917f29ed46caffa1211eb52ade01d24366a.tar.gz otp-5e18e917f29ed46caffa1211eb52ade01d24366a.tar.bz2 otp-5e18e917f29ed46caffa1211eb52ade01d24366a.zip | |
erts: Optimize ets:select_replace to not use heap
for temporary matchspec results.
ToDo: Would be even nicer if PAM could allocate and build
the ETS objects without extra copy_struct needed.
Diffstat (limited to 'erts/emulator/beam/erl_db_util.c')
| -rw-r--r-- | erts/emulator/beam/erl_db_util.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/erts/emulator/beam/erl_db_util.c b/erts/emulator/beam/erl_db_util.c index d4dbe3d434..03cc11bdc4 100644 --- a/erts/emulator/beam/erl_db_util.c +++ b/erts/emulator/beam/erl_db_util.c @@ -5332,6 +5332,7 @@ void db_free_tmp_uncompressed(DbTerm* obj) Eterm db_match_dbterm(DbTableCommon* tb, Process* c_p, Binary* bprog, int all, DbTerm* obj, Eterm** hpp, Uint extra) { + enum erts_pam_run_flags flags; Uint32 dummy; Eterm res; @@ -5339,9 +5340,13 @@ Eterm db_match_dbterm(DbTableCommon* tb, Process* c_p, Binary* bprog, obj = db_alloc_tmp_uncompressed(tb, obj); } + flags = (hpp ? + ERTS_PAM_COPY_RESULT | ERTS_PAM_CONTIGUOUS_TUPLE : + ERTS_PAM_TMP_RESULT | ERTS_PAM_CONTIGUOUS_TUPLE); + res = db_prog_match(c_p, c_p, bprog, make_tuple(obj->tpl), NULL, 0, - ERTS_PAM_COPY_RESULT|ERTS_PAM_CONTIGUOUS_TUPLE, &dummy); + flags, &dummy); if (is_value(res) && hpp!=NULL) { *hpp = HAlloc(c_p, extra); |