summaryrefslogtreecommitdiff
path: root/src/LispData.kt
diff options
context:
space:
mode:
Diffstat (limited to 'src/LispData.kt')
-rw-r--r--src/LispData.kt8
1 files changed, 8 insertions, 0 deletions
diff --git a/src/LispData.kt b/src/LispData.kt
index 5af3dd4..8eac3f7 100644
--- a/src/LispData.kt
+++ b/src/LispData.kt
@@ -99,5 +99,13 @@ sealed class LispData {
): LispExecutable {
return LispInterpretedCallable(declarationStackFrame, args, body, nameHint)
}
+
+ fun boolean(b: Boolean): Atom {
+ return if (b) {
+ CoreBindings.trueValue
+ } else {
+ CoreBindings.falseValue
+ }
+ }
}
}