17 lines
251 B
Plaintext
17 lines
251 B
Plaintext
general {
|
|
funcon-term:
|
|
initialise-binding
|
|
scope(
|
|
bind-recursively("x",
|
|
thunk closure
|
|
is-value bound-value"x"),
|
|
force bound-value"x")
|
|
;
|
|
}
|
|
|
|
tests {
|
|
result-term:
|
|
true
|
|
;
|
|
}
|