From e9d5b4f65f968419a4dc78c76cde21d6c99d2ebd Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Wed, 13 Oct 2021 20:10:02 -0400
Subject: [PATCH] another failing macro test case

---
 kiss/src/test/cases/MacroTestCase.hx   |  4 ++++
 kiss/src/test/cases/MacroTestCase.kiss | 11 ++++++++++-
 2 files changed, 14 insertions(+), 1 deletion(-)

diff --git a/kiss/src/test/cases/MacroTestCase.hx b/kiss/src/test/cases/MacroTestCase.hx
index 24454a22..f32a8e9b 100644
--- a/kiss/src/test/cases/MacroTestCase.hx
+++ b/kiss/src/test/cases/MacroTestCase.hx
@@ -40,4 +40,8 @@ class MacroTestCase extends Test {
     function testPrintAtMacroTime() {
         _testPrintAtMacroTime();
     }
+
+    function testSetMacroVar() {
+        _testSetMacroVar();
+    }
 }
diff --git a/kiss/src/test/cases/MacroTestCase.kiss b/kiss/src/test/cases/MacroTestCase.kiss
index de9e87cd..9b905195 100644
--- a/kiss/src/test/cases/MacroTestCase.kiss
+++ b/kiss/src/test/cases/MacroTestCase.kiss
@@ -70,4 +70,13 @@
     (printAtMacroTime))
 
 (function testPrintAtMacroTime []
-    (_testPrintAtMacroTimeMacro))
\ No newline at end of file
+    (_testPrintAtMacroTimeMacro))
+
+(defMacroVar count 0)
+(defMacro _testSetMacroVarMacro []
+    (set count (+ count 1))
+    (ReaderExp.StrExp (Std.string count)))
+
+(function _testSetMacroVar []
+    (Assert.equals 1 (_testSetMacroVarMacro))
+    (Assert.equals 2 (_testSetMacroVarMacro)))
\ No newline at end of file