https://gitlab.com/tezos/tezos
Raw File
Tip revision: 859ad53d118deb65fda70547abe20731c6e92aba authored by Emma Turner on 09 October 2023, 10:54:43 UTC
nix: disable stackprotector on all platforms
Tip revision: 859ad53
utxor.tz
parameter (pair address address);
storage nat;
code { UNPAIR ; DIP { DUP } ;
       SWAP ;
       PUSH nat 5 ; SWAP ;
       TICKET ;
       ASSERT_SOME ;
       PUSH nat 2 ; PUSH nat 3 ; PAIR ;
       SWAP ;
       SPLIT_TICKET ;
       ASSERT_SOME ;
       UNPAIR ;
       DIP { DIP { DUP ; CAR ;
                   CONTRACT (pair (ticket nat) nat) ; ASSERT_SOME ;
                   PUSH mutez 0 } ;
             PUSH nat 2 ; SWAP ; PAIR ; } ;
       DIP { TRANSFER_TOKENS } ;
       SWAP ;
       DIP { DIP { CDR ;
                   CONTRACT (pair (ticket nat) nat) ; ASSERT_SOME ;
                   PUSH mutez 0 } ;
             PUSH nat 3 ; SWAP ; PAIR ; } ;
       DIP { TRANSFER_TOKENS } ;
       NIL operation ; SWAP ; CONS ; SWAP ; CONS ;
       PAIR }
back to top