printExp, printStr

2021-08-04 20:07:15 -06:00
parent 32b9466ec9
commit 7c05b0d4ab
4 changed files with 27 additions and 9 deletions
--- a/kiss/src/test/cases/GenerativeTestCase.kiss
+++ b/kiss/src/test/cases/GenerativeTestCase.kiss
@@ -28,7 +28,7 @@
                    ,@(_randomLengthMacroList _randomUncertainExp))}
        ])))
 (defMacro randomFalsyExp []
-    ~(_randomFalsyExp))
+    (printExp (_randomFalsyExp) "Falsy"))

 (defMacroFunction _randomTruthyExp []
    ((chooseRandom
@@ -37,7 +37,7 @@
            ->{(_randomLetterString)}
        ])))
 (defMacro randomTruthyExp []
-    ~(_randomTruthyExp))
+    (printExp (_randomTruthyExp) "Truthy"))

 (defMacroFunction _randomUncertainExp []
    ((chooseRandom