summaryrefslogtreecommitdiff
path: root/src/Builtins.kt
diff options
context:
space:
mode:
Diffstat (limited to 'src/Builtins.kt')
-rw-r--r--src/Builtins.kt5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Builtins.kt b/src/Builtins.kt
index 484ea3a..6ca60e9 100644
--- a/src/Builtins.kt
+++ b/src/Builtins.kt
@@ -9,8 +9,9 @@ object Builtins {
) {
val stackFrame = lispExecutionContext.genBindings()
stackFrame.setValueLocal("export", LispData.externalRawCall { context, callsite, stackFrame, args ->
- val (name) = args
- consumer((name as LispAst.Reference).label, context.resolveValue(stackFrame, name))
+ args.forEach { name ->
+ consumer((name as LispAst.Reference).label, context.resolveValue(stackFrame, name))
+ }
return@externalRawCall LispData.LispNil
})
lispExecutionContext.executeProgram(stackFrame, builtinProgram)