From 0b64b32f8e1d6b22158484d43b64fca212a08672 Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Sun, 25 Jul 2021 20:06:34 -0600
Subject: [PATCH] test inline (load)

---
 kiss/src/test/cases/BasicTestCase.hx         | 4 ++++
 kiss/src/test/cases/BasicTestCase.kiss       | 5 +++++
 kiss/src/test/cases/BasicTestCaseExtra2.kiss | 2 ++
 3 files changed, 11 insertions(+)
 create mode 100644 kiss/src/test/cases/BasicTestCaseExtra2.kiss

diff --git a/kiss/src/test/cases/BasicTestCase.hx b/kiss/src/test/cases/BasicTestCase.hx
index 10205d88..a64f9c1c 100644
--- a/kiss/src/test/cases/BasicTestCase.hx
+++ b/kiss/src/test/cases/BasicTestCase.hx
@@ -278,6 +278,10 @@ class BasicTestCase extends Test {
         Assert.equals("loaded", BasicTestCase.loadedFunction());
     }
 
+    function testLoadInline() {
+        _testLoadInline();
+    }
+
     function testAssignArith() {
         _testAssignArith();
     }
diff --git a/kiss/src/test/cases/BasicTestCase.kiss b/kiss/src/test/cases/BasicTestCase.kiss
index 87043266..a0532e66 100644
--- a/kiss/src/test/cases/BasicTestCase.kiss
+++ b/kiss/src/test/cases/BasicTestCase.kiss
@@ -1,6 +1,11 @@
 // (load) brings in the fields and compile-time definitions of another Kiss file
 (load "BasicTestCaseExtra.kiss")
 
+(function _testLoadInline []
+    (let [&mut thatValue 5]
+        (load "BasicTestCaseExtra2.kiss")
+        (Assert.equals 50 thatValue)))
+
 // (var) declares static variables
 (var message "Howdy")
 
diff --git a/kiss/src/test/cases/BasicTestCaseExtra2.kiss b/kiss/src/test/cases/BasicTestCaseExtra2.kiss
new file mode 100644
index 00000000..0d28b5c2
--- /dev/null
+++ b/kiss/src/test/cases/BasicTestCaseExtra2.kiss
@@ -0,0 +1,2 @@
+// Using inline (load) for something like this would actually be terrible:
+(set thatValue 50)
\ No newline at end of file