28 lines
570 B
Plaintext
28 lines
570 B
Plaintext
initialise-binding scope
|
|
(collateral
|
|
(bind
|
|
("test",
|
|
function abstraction
|
|
(scope
|
|
(collateral
|
|
(map
|
|
( )),
|
|
return decimal-natural
|
|
("3")))),
|
|
bind
|
|
("x",
|
|
allocate-initialised-variable
|
|
(integers,
|
|
0)),
|
|
map
|
|
( )),
|
|
sequential
|
|
(null,
|
|
assign
|
|
(bound "x",
|
|
handle-return apply
|
|
(bound "test",
|
|
null)),
|
|
print assigned
|
|
(bound
|
|
("x")))) |