multi-target convertToHScript function in Prelude

This commit is contained in:
2021-05-18 15:35:48 -06:00
parent 0989aa06d3
commit dfba66b900
3 changed files with 36 additions and 9 deletions

View File

@@ -6,8 +6,6 @@ import kiss.Operand;
import kiss.Stream;
import vscode.*;
import js.lib.Promise;
import js.node.ChildProcess;
import js.node.buffer.Buffer;
import hscript.Parser;
import hscript.Interp;
import hscript.Expr;

View File

@@ -58,17 +58,11 @@
* Functionality
*/
(defun :String convertToHScript [kissStr]
(let [kissProcess (ChildProcess.spawnSync "haxelib" ["run" "kiss" "--all"] (object input "${kissStr}\n"))]
(if !(= kissProcess.status 0)
{(errorMessage "failed to compile ${kissStr}: $(.toString (the Buffer .stderr kissProcess))") ""}
(.toString (the Buffer .stdout kissProcess)))))
(defun :Dynamic evalString [:String kissStr]
(try
(interp.execute
(parser.parseString
(convertToHScript kissStr)))
(Prelude.convertToHScript kissStr)))
(catch [e]
(errorMessage "Error `${e}` from $kissStr")
null)))