From ecae424344a0189e86b7509814903dd4247caf17 Mon Sep 17 00:00:00 2001
From: Ruthenic <mdrakea3@tutanota.com>
Date: Thu, 24 Feb 2022 16:05:46 -0500
Subject: [PATCH] Move testing lisp to separate file

---
 src/test.js  | 20 ++++----------------
 src/test.lsp | 16 ++++++++++++++++
 2 files changed, 20 insertions(+), 16 deletions(-)
 create mode 100644 src/test.lsp

diff --git a/src/test.js b/src/test.js
index 26e589e..3dfda52 100644
--- a/src/test.js
+++ b/src/test.js
@@ -1,4 +1,5 @@
 import { VM, run, libBasic } from "cumlisp"
+import { readFile } from "fs"
 
 import test from "./index.js"
 
@@ -16,19 +17,6 @@ test(vm)
 	(assertTrue "Failed assertion to true" (equals 1 0))
 	(assertTrue "Assertion with variables and strings" (equals (x) "deez"))
 )`, vm))*/
-console.log(await run(`%(
-	(set x "deez")
-	(set y "deez")
-	(set z "nuts")
-	(testWrapper
-		(testSet "assertTrue"
-			(assertTrue "assertTrue success" (equals 1 1))
-			(assertTrue "assertTrue fail" (equals 1 0))
-			(assertTrue "assertTrue success with strings" (equals (x) "deez")))
-		(testSet "assertEquals"
-			(assertEquals "assertEquals success" (x) (y))
-			(assertEquals "assertEquals failure" (x) (z)))
-		(testSet "Miscellaneous"
-			(assertTrue "libBasic comparison functions" (== (x) (y))))
-	)
-)`, vm))
+readFile("./test.lsp", 'utf8', async (err, data) => {
+	console.log(await run(data, vm))
+})
diff --git a/src/test.lsp b/src/test.lsp
new file mode 100644
index 0000000..ef47303
--- /dev/null
+++ b/src/test.lsp
@@ -0,0 +1,16 @@
+%(
+	(set x "deez")
+	(set y "deez")
+	(set z "nuts")
+	(testWrapper
+		(testSet "assertTrue"
+			(assertTrue "assertTrue success" (equals 1 1))
+			(assertTrue "assertTrue fail" (equals 1 0))
+			(assertTrue "assertTrue success with strings" (equals (x) "deez")))
+		(testSet "assertEquals"
+			(assertEquals "assertEquals success" (x) (y))
+			(assertEquals "assertEquals failure" (x) (z)))
+		(testSet "Miscellaneous"
+			(assertTrue "libBasic comparison functions" (== (x) (y))))
+	)
+)