kiss-lang/kiss-vscode
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

fix evalUnquotes rawHaxeBlock error

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-06-18 20:28:03 +00:00
parent 5b4424fd96
commit a1853d02e5
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
kiss/src/kiss/Helpers.hx
View File

@@ -532,7 +532,7 @@ class Helpers {
public static function evalUnquotes(exp:ReaderExp, innerRunAtCompileTime:(ReaderExp)->Dynamic):ReaderExp { public static function evalUnquotes(exp:ReaderExp, innerRunAtCompileTime:(ReaderExp)->Dynamic):ReaderExp {
var recurse = evalUnquotes.bind(_, innerRunAtCompileTime); var recurse = evalUnquotes.bind(_, innerRunAtCompileTime);
var def = switch (exp.def) { var def = switch (exp.def) {
case Symbol(_) | StrExp(_) | RawHaxe(_): case Symbol(_) | StrExp(_) | RawHaxe(_) | RawHaxeBlock:
exp.def; exp.def;
case CallExp(func, callArgs): case CallExp(func, callArgs):
CallExp(recurse(func), evalUnquoteLists(callArgs, innerRunAtCompileTime).map(recurse)); CallExp(recurse(func), evalUnquoteLists(callArgs, innerRunAtCompileTime).map(recurse));
@@ -547,7 +547,7 @@ class Helpers {
case Unquote(innerExp): case Unquote(innerExp):
var unquoteValue:Dynamic = innerRunAtCompileTime(innerExp); var unquoteValue:Dynamic = innerRunAtCompileTime(innerExp);
compileTimeValueToReaderExp(unquoteValue, exp).def; compileTimeValueToReaderExp(unquoteValue, exp).def;
case MetaExp(meta, innerExp): case MetaExp(meta, innerExp):
MetaExp(meta, recurse(innerExp)); MetaExp(meta, recurse(innerExp));
default: default:
throw KissError.fromExp(exp, 'unquote evaluation not implemented'); throw KissError.fromExp(exp, 'unquote evaluation not implemented');