balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

More unused variables in roll tests

Browse Source
This commit is contained in:
Pierre Boutillier 2018-06-15 10:12:31 +02:00 committed by Benjamin Canou
parent df214489b7
commit 6b2d730a4e
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/proto_alpha/lib_protocol/test/rolls.ml
View File

@ -49,7 +49,7 @@ let check_no_rolls (b : Block.t) (account:Account.t) =
let simple_staking_rights () =
Context.init 2 >>=? fun (b,accounts) ->
let (a1, a2) = account_pair accounts in
let (a1, _a2) = account_pair accounts in
Context.Contract.balance (B b) a1 >>=? fun balance ->
Context.Contract.manager (B b) a1 >>=? fun m1 ->
@ -107,8 +107,8 @@ let run_until_deactivation () =
let deactivation_then_bake () =
run_until_deactivation () >>=?
fun (b, ((deactivated_contract, deactivated_account) as deactivated, _start_balance),
(a2, m2)) ->
fun (b, ((_deactivated_contract, deactivated_account) as deactivated, _start_balance),
(_a2, _m2)) ->
Block.bake ~policy:(By_account deactivated_account.pkh) b >>=? fun b ->
@ -118,7 +118,7 @@ let deactivation_then_bake () =
let deactivation_then_self_delegation () =
run_until_deactivation () >>=?
fun (b, ((deactivated_contract, deactivated_account) as deactivated, start_balance),
(a2, m2)) ->
(_a2, m2)) ->
Op.delegation (B b) deactivated_contract (Some deactivated_account.pkh) >>=? fun self_delegation ->