diff options
| author | Rickard Green <[email protected]> | 2017-01-23 21:26:22 +0100 |
|---|---|---|
| committer | Rickard Green <[email protected]> | 2017-02-06 19:54:48 +0100 |
| commit | 2a78349342b9f72651c016b650321bb317098a3c (patch) | |
| tree | a859e377aa9426863fe381ef30bd940a2c7935dd /lib/stdlib/test/dets_SUITE.erl | |
| parent | 8d4dd97bcbd0988b08f8f8141ec7cfb17a16aa4a (diff) | |
| download | otp-2a78349342b9f72651c016b650321bb317098a3c.tar.gz otp-2a78349342b9f72651c016b650321bb317098a3c.tar.bz2 otp-2a78349342b9f72651c016b650321bb317098a3c.zip | |
Use magic refs for compiled match specs
Diffstat (limited to 'lib/stdlib/test/dets_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/dets_SUITE.erl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lib/stdlib/test/dets_SUITE.erl b/lib/stdlib/test/dets_SUITE.erl index aa31fdde5a..95c9b47465 100644 --- a/lib/stdlib/test/dets_SUITE.erl +++ b/lib/stdlib/test/dets_SUITE.erl @@ -3012,8 +3012,13 @@ repair_continuation(Config) -> MS = [{'_',[],[true]}], - {[true], C1} = dets:select(Tab, MS, 1), - C2 = binary_to_term(term_to_binary(C1)), + SRes = term_to_binary(dets:select(Tab, MS, 1)), + %% Get rid of compiled match spec + lists:foreach(fun (P) -> + garbage_collect(P) + end, processes()), + {[true], C2} = binary_to_term(SRes), + {'EXIT', {badarg, _}} = (catch dets:select(C2)), C3 = dets:repair_continuation(C2, MS), {[true], C4} = dets:select(C3), |