ligo/test/scripts/hardlimit.tez

8 lines
243 B
Plaintext
Raw Normal View History

2017-01-11 19:15:38 +04:00
parameter unit
2016-09-08 21:13:10 +04:00
code
{ # This contract stop to accept transactions after N incoming transactions
CDR ; PUSH (Uint32 1) ; SWAP ; SUB ;
DUP ; PUSH (Uint32 0) ; COMPARE ; EQ ; IF { FAIL } {} ;
2017-01-11 19:15:38 +04:00
UNIT ; PAIR }
return unit
2016-09-08 21:13:10 +04:00
storage uint32