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

multisigv2 default entry point

Browse Source
This commit is contained in:
Lesenechal Remi 2019-11-26 12:14:42 +01:00
parent c8eb1a3fa6
commit cf540a1a78
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/test/contracts/multisig-v2.ligo
View File

@ -21,12 +21,14 @@ end
type message_t is (bytes -> list(operation))
type send_pt is message_t
type withdraw_pt is message_t
type default_pt is unit
type contract_return_t is (list(operation) * storage_t)
type entry_point_t is
| Send of send_pt
| Withdraw of withdraw_pt
| Default of default_pt
function send (const param : send_pt; const s : storage_t) : contract_return_t is block {
@ -86,8 +88,12 @@ function withdraw (const param : withdraw_pt; const s : storage_t) : contract_re
} with ( (nil: list(operation)) , s)
function default (const p : default_pt; const s : storage_t) : contract_return_t is
((nil: list(operation)) , s)
function main(const param : entry_point_t; const s : storage_t) : contract_return_t is
case param of
| Send (p) -> send(p,s)
| Withdraw (p) -> withdraw(p,s)
| Default (p) -> default(p,s)
end