5 lines
118 B
Plaintext
5 lines
118 B
Plaintext
parameter string;
|
|
storage (pair string nat);
|
|
return (pair string nat);
|
|
code {DUP; CDR; DIP{CAR}; SET_CAR; DUP; PAIR};
|