summaryrefslogtreecommitdiff
path: root/src/CoreBindings.kt
diff options
context:
space:
mode:
Diffstat (limited to 'src/CoreBindings.kt')
-rw-r--r--src/CoreBindings.kt3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/CoreBindings.kt b/src/CoreBindings.kt
index b344dc7..48ecdad 100644
--- a/src/CoreBindings.kt
+++ b/src/CoreBindings.kt
@@ -108,7 +108,7 @@ object CoreBindings {
lastResult ?: context.reportError("Seq cannot be invoked with 0 argumens", callsite)
}
- private fun stringify(thing: LispData): String {
+ internal fun stringify(thing: LispData): String {
return when (thing) {
is LispData.Atom -> ":${thing.label}"
is LispData.JavaExecutable -> "<native code>"
@@ -119,7 +119,6 @@ object CoreBindings {
is LispData.LispNumber -> thing.value.toString()
is LispData.LispInterpretedCallable -> "<function ${thing.name ?: "<anonymous>"} ${thing.argNames} ${thing.body.toSource()}>"
}
-
}
val debuglog = LispData.externalRawCall { context, callsite, stackFrame, args ->