@@ -251,127 +251,28 @@ new_reward(Account, Amount) ->
251251get_reward_vars (Start , End , Ledger ) ->
252252 {ok , MonthlyReward } = blockchain :config (? monthly_reward , Ledger ),
253253 {ok , SecuritiesPercent } = blockchain :config (? securities_percent , Ledger ),
254- {ok , PocChallengeesPercent } = blockchain :config (? poc_challengees_percent , Ledger ),
255- {ok , PocChallengersPercent } = blockchain :config (? poc_challengers_percent , Ledger ),
256- {ok , PocWitnessesPercent } = blockchain :config (? poc_witnesses_percent , Ledger ),
257254 {ok , ConsensusPercent } = blockchain :config (? consensus_percent , Ledger ),
258- {ok , OraclePrice } = blockchain_ledger_v1 :current_oracle_price (Ledger ),
259- DCPercent =
260- case blockchain :config (? dc_percent , Ledger ) of
261- {ok , R1 } ->
262- R1 ;
263- _ ->
264- 0
265- end ,
266- SCGrace =
267- case blockchain :config (? sc_grace_blocks , Ledger ) of
268- {ok , R2 } ->
269- R2 ;
270- _ ->
271- 0
272- end ,
273- SCVersion =
274- case blockchain :config (? sc_version , Ledger ) of
275- {ok , R3 } ->
276- R3 ;
277- _ ->
278- 1
279- end ,
280- SCDisputeStrategyVersion =
281- case blockchain :config (? sc_dispute_strategy_version , Ledger ) of
282- {ok , SCDV } -> SCDV ;
283- _ -> 0
284- end ,
285- POCVersion =
286- case blockchain :config (? poc_version , Ledger ) of
287- {ok , V } -> V ;
288- _ -> 1
289- end ,
290- RewardVersion =
291- case blockchain :config (? reward_version , Ledger ) of
292- {ok , R4 } -> R4 ;
293- _ -> 1
294- end ,
295-
296- WitnessRedundancy =
297- case blockchain :config (? witness_redundancy , Ledger ) of
298- {ok , WR } -> WR ;
299- _ -> undefined
300- end ,
301-
302- DecayRate =
303- case blockchain :config (? poc_reward_decay_rate , Ledger ) of
304- {ok , R } -> R ;
305- _ -> undefined
306- end ,
307-
308- DensityTgtRes =
309- case blockchain :config (? density_tgt_res , Ledger ) of
310- {ok , D } -> D ;
311- _ -> undefined
312- end ,
313-
314- HIP15TxRewardUnitCap =
315- case blockchain :config (? hip15_tx_reward_unit_cap , Ledger ) of
316- {ok , Val } -> Val ;
317- _ -> undefined
318- end ,
319-
320255 {ok , ElectionInterval } = blockchain :config (? election_interval , Ledger ),
321256 {ok , ElectionRestartInterval } = blockchain :config (? election_restart_interval , Ledger ),
322257 {ok , BlockTime } = blockchain :config (? block_time , Ledger ),
323-
324- WitnessRewardDecayRate =
325- case blockchain :config (? witness_reward_decay_rate , Ledger ) of
326- {ok , Dec } -> Dec ;
327- _ -> undefined
328- end ,
329-
330- WitnessRewardDecayExclusion =
331- case blockchain :config (? witness_reward_decay_exclusion , Ledger ) of
332- {ok , Exc } -> Exc ;
333- _ -> undefined
334- end ,
335-
336- PocChallengerType =
337- case blockchain :config (? poc_challenger_type , Ledger ) of
338- {ok , validator } -> validator ;
339- _ -> gateway
340- end ,
258+ {ok , RewardVersion } = blockchain :config (? reward_version , Ledger ),
259+ {ok , NetEmissionsMaxRate } = blockchain :config (? net_emissions_max_rate , Ledger ),
260+ {ok , HNTBurned } = blockchain_ledger_v1 :hnt_burned (Ledger ),
261+ {ok , NetOverage } = blockchain_ledger_v1 :net_overage (Ledger ),
341262
342263 TreasuryPubkeyBin =
343264 case blockchain :config (? treasury_pubkey_bin , Ledger ) of
344265 {ok , TPB } -> TPB ;
345266 _ -> undefined
346267 end ,
347268
348- {ok , NetEmissionsMaxRate } = blockchain :config (? net_emissions_max_rate , Ledger ),
349- {ok , HNTBurned } = blockchain_ledger_v1 :hnt_burned (Ledger ),
350- {ok , NetOverage } = blockchain_ledger_v1 :net_overage (Ledger ),
351-
352269 Vars0 = #{
353270 monthly_reward => MonthlyReward ,
354- oracle_price => OraclePrice ,
355271 securities_percent => SecuritiesPercent ,
356- poc_challengees_percent => PocChallengeesPercent ,
357- poc_challengers_percent => PocChallengersPercent ,
358- poc_witnesses_percent => PocWitnessesPercent ,
359272 consensus_percent => ConsensusPercent ,
360- dc_percent => DCPercent ,
361- poc_challenger_type => PocChallengerType ,
362- sc_grace_blocks => SCGrace ,
363- sc_version => SCVersion ,
364- sc_dispute_strategy_version => SCDisputeStrategyVersion ,
365- poc_version => POCVersion ,
366273 reward_version => RewardVersion ,
367- witness_redundancy => WitnessRedundancy ,
368- poc_reward_decay_rate => DecayRate ,
369- density_tgt_res => DensityTgtRes ,
370- hip15_tx_reward_unit_cap => HIP15TxRewardUnitCap ,
371274 election_interval => ElectionInterval ,
372275 election_restart_interval => ElectionRestartInterval ,
373- witness_reward_decay_rate => WitnessRewardDecayRate ,
374- witness_reward_decay_exclusion => WitnessRewardDecayExclusion ,
375276 block_time => BlockTime ,
376277 net_emissions_max_rate => NetEmissionsMaxRate ,
377278 hnt_burned => HNTBurned ,
0 commit comments