10 lines
270 B
Plaintext
10 lines
270 B
Plaintext
type parameter is unit
|
|
type storage is timestamp
|
|
type return is list (operation) * storage
|
|
|
|
function main (const p : parameter; const s : storage) : return is
|
|
block {
|
|
var stamp : timestamp := ("badtimestamp" : timestamp)
|
|
}
|
|
with ((nil: list(operation)), stamp)
|