9 lines
288 B
Plaintext
9 lines
288 B
Plaintext
parameter (list (pair string int)) ;
|
|
storage (pair (big_map string int) unit) ;
|
|
code { UNPAAIAIR ;
|
|
ITER { UNPAIR ; DUUUP ; DUUP; GET ;
|
|
IF_NONE { PUSH int 0 } {} ;
|
|
SWAP ; DIP { ADD ; SOME } ;
|
|
UPDATE } ;
|
|
PAIR ; NIL operation ; PAIR }
|