warning-free vsns of string:str/2 & string:right/3

This commit is contained in:
Ulf Wiger 2018-12-07 08:39:44 +01:00
parent bfddb53e31
commit fbe200f1ca
7 changed files with 75 additions and 14 deletions

View file

@ -2487,8 +2487,10 @@ generate_randomkeys(_Seqn, 0, Acc, _BucketLow, _BucketHigh) ->
Acc;
generate_randomkeys(Seqn, Count, Acc, BucketLow, BRange) ->
BRand = leveled_rand:uniform(BRange),
BNumber = string:right(integer_to_list(BucketLow + BRand), 4, $0),
KNumber = string:right(integer_to_list(leveled_rand:uniform(1000)), 6, $0),
BNumber = leveled_util:string_right(
integer_to_list(BucketLow + BRand), 4, $0),
KNumber = leveled_util:string_right(
integer_to_list(leveled_rand:uniform(1000)), 6, $0),
LK = leveled_codec:to_ledgerkey("Bucket" ++ BNumber, "Key" ++ KNumber, o),
Chunk = leveled_rand:rand_bytes(64),
{_B, _K, MV, _H, _LMs} =