ligo/test/contracts/hardlimit.tz

parameter unit
code
  { # This contract stops accepting transactions after N incoming transactions
    CDR ; DUP ; PUSH int 0 ; CMPLT; IF {PUSH int -1 ; ADD} {FAIL};
    UNIT; PAIR}
return unit
storage int
Michelson: rename void into unit. 2017-01-11 19:15:38 +04:00			`parameter unit`
First public release 2016-09-08 21:13:10 +04:00			`code`
Michelson: updates test suite to use `int` and `nat` 2017-07-18 19:38:20 +04:00			`{ # This contract stops accepting transactions after N incoming transactions`
			`CDR ; DUP ; PUSH int 0 ; CMPLT; IF {PUSH int -1 ; ADD} {FAIL};`
			`UNIT; PAIR}`
Michelson: rename void into unit. 2017-01-11 19:15:38 +04:00			`return unit`
Michelson: updates test suite to use `int` and `nat` 2017-07-18 19:38:20 +04:00			`storage int`