17 lines
236 B
Plaintext
17 lines
236 B
Plaintext
general {
|
|
funcon-term:
|
|
initialise-giving
|
|
give(
|
|
1,
|
|
no-given
|
|
else(
|
|
print given,
|
|
print"OK"))
|
|
;
|
|
}
|
|
|
|
tests {
|
|
result-term: null-value;
|
|
standard-out: ["OK"];
|
|
}
|