summaryrefslogtreecommitdiff
path: root/src/StackFrame.kt
diff options
context:
space:
mode:
Diffstat (limited to 'src/StackFrame.kt')
-rw-r--r--src/StackFrame.kt5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/StackFrame.kt b/src/StackFrame.kt
index 9a0832f..c91299f 100644
--- a/src/StackFrame.kt
+++ b/src/StackFrame.kt
@@ -12,6 +12,11 @@ class StackFrame(val parent: StackFrame?) {
return meta[key]?.let { it as T } ?: parent?.meta?.get(key)?.let { it as T }
}
+ fun reportError(name: String, position: HasLispPosition): LispData.LispNil {
+ OutputCapture.print(this, "Error: $name ${position.position}\n")
+ return LispData.LispNil
+ }
+
fun <T : Any> setMeta(key: MetaKey<T>, value: T) {
meta[key] = value
}