19 lines
316 B
Plaintext
19 lines
316 B
Plaintext
general {
|
|
funcon-term:
|
|
initialise-giving
|
|
give(
|
|
sequential(
|
|
print 1,
|
|
2),
|
|
sequential(
|
|
print given,
|
|
give(3, print given),
|
|
print integer-add(given,2)))
|
|
;
|
|
}
|
|
|
|
tests {
|
|
result-term: null-value;
|
|
standard-out: [1, 2, 3, 4];
|
|
}
|