2020-02-10 19:27:58 +01:00
|
|
|
type parameter is unit
|
|
|
|
type storage is timestamp
|
|
|
|
type return is list (operation) * storage
|
2020-01-03 17:46:31 +01:00
|
|
|
|
2020-02-10 19:27:58 +01:00
|
|
|
function main (const p : parameter; const s : storage) : return is
|
2020-01-03 17:46:31 +01:00
|
|
|
block {
|
2020-02-10 19:27:58 +01:00
|
|
|
var stamp : timestamp := ("badtimestamp" : timestamp)
|
2020-01-03 17:46:31 +01:00
|
|
|
}
|
2020-02-10 19:27:58 +01:00
|
|
|
with ((nil: list(operation)), stamp)
|