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 16:15:38 +01:00			`parameter unit`
First public release 2016-09-08 19:13:10 +02:00			`code`
Michelson: updates test suite to use `int` and `nat` 2017-07-18 17:38:20 +02: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 16:15:38 +01:00			`return unit`
Michelson: updates test suite to use `int` and `nat` 2017-07-18 17:38:20 +02:00			`storage int`