move bindingList() definition to Prelude
This commit is contained in:
@@ -717,18 +717,7 @@ class Helpers {
|
|||||||
}
|
}
|
||||||
|
|
||||||
public static function bindingList(exp:ReaderExp, forThis:String, allowEmpty = false):Array<ReaderExp> {
|
public static function bindingList(exp:ReaderExp, forThis:String, allowEmpty = false):Array<ReaderExp> {
|
||||||
return switch (exp.def) {
|
return Prelude.bindingList(exp, forThis, allowEmpty);
|
||||||
// At macro-time, a list of exps could be passed instead of a ListExp. Handle
|
|
||||||
// that tricky case:
|
|
||||||
case null if (Std.isOfType(exp, Array)):
|
|
||||||
var expList = cast(exp, Array<Dynamic>);
|
|
||||||
var expDynamic:Dynamic = exp;
|
|
||||||
bindingList({pos:expList[0].pos, def: ListExp(expDynamic)}, forThis, allowEmpty);
|
|
||||||
case ListExp(bindingExps) if ((allowEmpty || bindingExps.length > 0) && bindingExps.length % 2 == 0):
|
|
||||||
bindingExps;
|
|
||||||
default:
|
|
||||||
throw KissError.fromExp(exp, '$forThis bindings should be a list or list expression with an even number of sub expressions (at least 2)');
|
|
||||||
};
|
|
||||||
}
|
}
|
||||||
|
|
||||||
public static function compileTimeResolveToString(description:String, description2:String, exp:ReaderExp, k:KissState):String {
|
public static function compileTimeResolveToString(description:String, description2:String, exp:ReaderExp, k:KissState):String {
|
||||||
|
|||||||
@@ -539,6 +539,21 @@ class Prelude {
|
|||||||
#end
|
#end
|
||||||
}
|
}
|
||||||
|
|
||||||
|
public static function bindingList(exp:ReaderExp, forThis:String, allowEmpty = false):Array<ReaderExp> {
|
||||||
|
return switch (exp.def) {
|
||||||
|
// At macro-time, a list of exps could be passed instead of a ListExp. Handle
|
||||||
|
// that tricky case:
|
||||||
|
case null if (Std.isOfType(exp, Array)):
|
||||||
|
var expList = cast(exp, Array<Dynamic>);
|
||||||
|
var expDynamic:Dynamic = exp;
|
||||||
|
bindingList({pos:expList[0].pos, def: ListExp(expDynamic)}, forThis, allowEmpty);
|
||||||
|
case ListExp(bindingExps) if ((allowEmpty || bindingExps.length > 0) && bindingExps.length % 2 == 0):
|
||||||
|
bindingExps;
|
||||||
|
default:
|
||||||
|
throw KissError.fromExp(exp, '$forThis bindings should be a list or list expression with an even number of sub expressions (at least 2)');
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
public static function symbolNameValue(s:ReaderExp, allowTyped:Null<Bool> = false, allowMeta:Null<Bool> = false):String {
|
public static function symbolNameValue(s:ReaderExp, allowTyped:Null<Bool> = false, allowMeta:Null<Bool> = false):String {
|
||||||
return switch (s.def) {
|
return switch (s.def) {
|
||||||
case Symbol(name): name;
|
case Symbol(name): name;
|
||||||
|
|||||||
Reference in New Issue
Block a user