diff options
| author | Sverker Eriksson <[email protected]> | 2012-08-21 11:12:20 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2012-08-21 11:53:16 +0200 |
| commit | 17a8416f2ccbcda98c5d28af2b007aaca2b333fe (patch) | |
| tree | ddf96bd954a2662145892e90bc7f2801b076f0db /lib/stdlib/test/ets_SUITE.erl | |
| parent | 2a017b471cb2096eccf2f908f38a7a5305901788 (diff) | |
| download | otp-17a8416f2ccbcda98c5d28af2b007aaca2b333fe.tar.gz otp-17a8416f2ccbcda98c5d28af2b007aaca2b333fe.tar.bz2 otp-17a8416f2ccbcda98c5d28af2b007aaca2b333fe.zip | |
Fix bug in ets:test_ms/2.
copy_shallow was called when using '$_'
Diffstat (limited to 'lib/stdlib/test/ets_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/ets_SUITE.erl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/stdlib/test/ets_SUITE.erl b/lib/stdlib/test/ets_SUITE.erl index 97ac433cb9..95f10b1df3 100644 --- a/lib/stdlib/test/ets_SUITE.erl +++ b/lib/stdlib/test/ets_SUITE.erl @@ -1026,6 +1026,8 @@ t_test_ms(Config) when is_list(Config) -> [{{'$1','$2'},[{'<','$1','$2'}],['$$']}]), ?line {ok,false} = ets:test_ms({a,b}, [{{'$1','$2'},[{'>','$1','$2'}],['$$']}]), + Tpl = {a,gb_sets:new()}, + ?line {ok,Tpl} = ets:test_ms(Tpl, [{{'_','_'}, [], ['$_']}]), % OTP-10190 ?line {error,[{error,String}]} = ets:test_ms({a,b}, [{{'$1','$2'}, [{'flurp','$1','$2'}], |