summaryrefslogtreecommitdiff
path: root/test/src/TestLisp.kt
diff options
context:
space:
mode:
Diffstat (limited to 'test/src/TestLisp.kt')
-rw-r--r--test/src/TestLisp.kt14
1 files changed, 14 insertions, 0 deletions
diff --git a/test/src/TestLisp.kt b/test/src/TestLisp.kt
new file mode 100644
index 0000000..f986f1c
--- /dev/null
+++ b/test/src/TestLisp.kt
@@ -0,0 +1,14 @@
+import moe.nea.lisp.CoreBindings
+import moe.nea.lisp.LispExecutionContext
+import moe.nea.lisp.LispParser
+import java.io.File
+
+object T
+
+fun main() {
+ val otherP = LispParser.parse(File(T::class.java.getResource("/test.lisp")!!.file))
+ val executionContext = LispExecutionContext()
+ val bindings = executionContext.genBindings()
+ CoreBindings.offerAllTo(bindings)
+ executionContext.executeProgram(bindings, otherP)
+}