7 lines
312 B
Plaintext
Raw Normal View History

parameter (list int);
storage (list int);
code { CAR; # Get the parameter
2018-05-02 01:45:15 +02:00
MAP { PUSH int 1; ADD }; # Map over the list adding one
NIL operation; # No internal op
PAIR } # Match the calling convetion