From 31482d418e1856a3e070429c61bd3d2bfc7fab5e Mon Sep 17 00:00:00 2001
From: Luca Favatella <luca.favatella@erlang-solutions.com>
Date: Fri, 29 Mar 2019 14:29:38 +0000
Subject: [PATCH] Enable caller to select small initial nonce

... for reproducing quite closely behaviour before 68124a3
---
 src/aeminer_pow.erl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/aeminer_pow.erl b/src/aeminer_pow.erl
index ac8983c..15132e8 100644
--- a/src/aeminer_pow.erl
+++ b/src/aeminer_pow.erl
@@ -9,6 +9,7 @@
 -export([integer_to_scientific/1,
          next_nonce/2,
          pick_nonce/0,
+         pick_nonce/1,
          scientific_to_integer/1,
          target_to_difficulty/1,
          test_target/2,
@@ -118,7 +119,11 @@ next_nonce(Nonce, Cfg) ->
 
 -spec pick_nonce() -> nonce().
 pick_nonce() ->
-    rand:uniform(?MAX_NONCE + 1) - 1.
+    pick_nonce(?MAX_NONCE).
+
+-spec pick_nonce(1..?MAX_NONCE) -> nonce().
+pick_nonce(Max) ->
+    rand:uniform(Max + 1) - 1.
 
 -spec trim_nonce(nonce(), config()) -> nonce().
 trim_nonce(Nonce, Cfg) ->