ligo/test/contracts/set_cdr.tz

5 lines
115 B
Plaintext

parameter nat;
storage (pair string nat);
return (pair string nat);
code {DUP; CDR; DIP{CAR}; SET_CDR; DUP; PAIR};