aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib
diff options
context:
space:
mode:
authorRichard Carlsson <[email protected]>2019-03-11 16:16:42 +0100
committerRichard Carlsson <[email protected]>2019-03-11 16:17:59 +0100
commitdf0142c1da4966728f7b37fa779a1003b22fd72e (patch)
tree95313353145427824f6ffab8a9528e84f528abb0 /lib/stdlib
parenta52bd506e6b050b028f734cb9f90cf2e0a497d02 (diff)
downloadotp-df0142c1da4966728f7b37fa779a1003b22fd72e.tar.gz
otp-df0142c1da4966728f7b37fa779a1003b22fd72e.tar.bz2
otp-df0142c1da4966728f7b37fa779a1003b22fd72e.zip
Fix array tests hardcoded to node/leaf sizes
Diffstat (limited to 'lib/stdlib')
-rw-r--r--lib/stdlib/src/array.erl10
1 files changed, 4 insertions, 6 deletions
diff --git a/lib/stdlib/src/array.erl b/lib/stdlib/src/array.erl
index 32bc2a3372..1504326c61 100644
--- a/lib/stdlib/src/array.erl
+++ b/lib/stdlib/src/array.erl
@@ -1632,12 +1632,11 @@ foldl_test_() ->
?_assert(foldl(Sum, 0, from_list(lists:seq(0,10))) =:= 55),
?_assert(foldl(Reverse, [], from_list(lists:seq(0,1000)))
=:= lists:reverse(lists:seq(0,1000))),
- ?_assert({999,[N0*100+1+2,N0*2+1+1,0]} =:=
- foldl(Vals, {0,[]},
+ ?_assertEqual({N0*100+1-2,[N0*100+1+2,N0*2+1+1,0]},
+ foldl(Vals, {0,[]},
set(N0*100+1,2,
set(N0*2+1,1,
set(0,0,new())))))
-
].
-endif.
@@ -1787,12 +1786,11 @@ foldr_test_() ->
?_assert(foldr(Sum, 0, from_list(lists:seq(0,10))) =:= 55),
?_assert(foldr(List, [], from_list(lists:seq(0,1000)))
=:= lists:seq(0,1000)),
- ?_assert({999,[0,N0*2+1+1,N0*100+1+2]} =:=
- foldr(Vals, {0,[]},
+ ?_assertEqual({N0*100+1-2,[0,N0*2+1+1,N0*100+1+2]},
+ foldr(Vals, {0,[]},
set(N0*100+1,2,
set(N0*2+1,1,
set(0,0,new())))))
-
].
-endif.