Merge pull request #2854 from urbit/m/claz-register

claz: correct lockup registration arg order
This commit is contained in:
Fang 2020-05-06 14:40:58 +02:00 committed by GitHub
commit 69b6495d3d
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -417,14 +417,17 @@
:* to
(mul windup-years yer:yo)
stars
(div (mul unlock-years yer:yo) stars)
1
(div (mul unlock-years yer:yo) stars)
==
::
++ register-conditional
|= [to=address [b1=@ud b2=@ud b3=@ud] unlock-years-per-batch=@ud]
%- register-conditional:dat
=- [`address`to b1 b2 b3 `@ud`- 1]
(div (mul unlock-years-per-batch yer:yo) :(add b1 b2 b3))
:* to
b1 b2 b3
1
(div (mul unlock-years-per-batch yer:yo) :(add b1 b2 b3))
==
::
--
--