ligo/test/scripts/hardlimit.tez

8 lines
239 B
Plaintext
Raw Normal View History

2017-01-11 16:15:38 +01:00
parameter unit
2016-09-08 19:13:10 +02: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 16:15:38 +01:00
UNIT ; PAIR }
return unit
2016-09-08 19:13:10 +02:00
storage uint32