6 lines
214 B
Plaintext
6 lines
214 B
Plaintext
parameter unit ;
|
|
storage int ;
|
|
code { # This contract stops accepting transactions after N incoming transactions
|
|
CDR ; DUP ; PUSH int 0 ; CMPLT; IF {PUSH int -1 ; ADD} {FAIL};
|
|
NIL operation ; PAIR} ;
|