fix the test case & identify the problem

2024-12-06 14:41:33 -06:00
parent 5d0fce9298
commit 97df54c84f
1 changed files with 6 additions and 5 deletions
--- a/src/test/cases/ReaderMacroTestCase.kiss
+++ b/src/test/cases/ReaderMacroTestCase.kiss
@@ -43,12 +43,13 @@
    }
    (Assert.pass))

-(function _testStartOfLineInMiddle []
-    (let [bob "first"
-            bob2 "second"]
+(defReaderMacro &start "bob" [stream] `var1)
+(defReaderMacro "bob" [stream] `var2)                    

-        (defReaderMacro &start "bob" [stream] `bob)
-        (defReaderMacro "bob" [stream] `bob2)                    
+
+(function _testStartOfLineInMiddle []
+    (let [var1 "first"
+            var2 "second"]

        (Assert.equals "firstsecond" (+
            bob bob))))