KissInterp evalKiss

src/nat/BoolExpInterp.hx

@@ -1,7 +1,6 @@
 package nat;
 
 import kiss.KissInterp;
-import hscript.Parser;
 import kiss.Prelude;
 
 @:build(kiss.Kiss.build())

src/nat/BoolExpInterp.kiss

@@ -1,9 +1,5 @@
 (function eval [:String expStr :Array<String> activeConditions]
-    (let [hscript (Prelude.convertToHScript expStr)
-            parser (new Parser)
-            hscriptExp (parser.parseString hscript)
-            interp (new BoolExpInterp)]
-
+    (let [interp (new BoolExpInterp)]
         (doFor condition activeConditions
             (interp.variables.set condition true))
-        ?(interp.execute hscriptExp)))
+        ?(interp.evalKiss expStr)))