diff options
| author | Henrik Nord <[email protected]> | 2014-02-07 11:42:58 +0100 |
|---|---|---|
| committer | Henrik Nord <[email protected]> | 2014-02-07 11:43:44 +0100 |
| commit | 243ebeb5366a79180146eef8680a3909d340a1ca (patch) | |
| tree | d0eddc82d59845037b82769e87bde239714b2193 /lib/mnesia | |
| parent | 069b1840316979c69e4bfed1c814a239b852d8ba (diff) | |
| parent | 55222b92e84960c66fcd1a220c54917f3dfbda2e (diff) | |
| download | otp-243ebeb5366a79180146eef8680a3909d340a1ca.tar.gz otp-243ebeb5366a79180146eef8680a3909d340a1ca.tar.bz2 otp-243ebeb5366a79180146eef8680a3909d340a1ca.zip | |
Merge branch 'hsv/using_lists_droplast'
* hsv/using_lists_droplast:
lib/mnesia/test/ - Replace reverse(tl(reverse(L))) with lists:droplast/1
lib/ssh - Replace reverse(tl(reverse(L))) with lists:droplast/1
lib/wx - Replace reverse(tl(reverse(L))) with lists:droplast/1
Use lists:droplast/1 in orber/orber_interceptors.erl
Import and use lists:droplast/1 in v3_core/v3_kernel
OTP-11678
OTP-11677
Diffstat (limited to 'lib/mnesia')
| -rw-r--r-- | lib/mnesia/test/mnesia_frag_test.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/mnesia/test/mnesia_frag_test.erl b/lib/mnesia/test/mnesia_frag_test.erl index d3f6762af7..6695fbc880 100644 --- a/lib/mnesia/test/mnesia_frag_test.erl +++ b/lib/mnesia/test/mnesia_frag_test.erl @@ -461,7 +461,7 @@ nice_iter_access(Tab, FragNames, RawRead) -> ExpectedLast = lists:last(Keys), ?match(ExpectedLast, mnesia:last(Tab)), - ExpectedAllPrev = ['$end_of_table' | lists:reverse(tl(lists:reverse(Keys)))], + ExpectedAllPrev = ['$end_of_table' | lists:droplast(Keys)], ?match(ExpectedAllPrev, lists:map(fun(K) -> mnesia:prev(Tab, K) end, Keys)), ExpectedAllNext = tl(Keys) ++ ['$end_of_table'], @@ -477,7 +477,7 @@ evil_iter_access(Tab, FragNames, RawRead) -> ExpectedLast = lists:last(Keys), ?match(ExpectedLast, mnesia:last(Tab)), - ExpectedAllPrev = ['$end_of_table' | lists:reverse(tl(lists:reverse(Keys)))], + ExpectedAllPrev = ['$end_of_table' | lists:droplast(Keys)], ?match(ExpectedAllPrev, lists:map(fun(K) -> mnesia:prev(Tab, K) end, Keys)), ExpectedAllNext = tl(Keys) ++ ['$end_of_table'], |