urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-11-28 22:33:06 +03:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
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
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pkg/arvo/app/claz.hoon
View File

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