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