bigml-nodered-core
Version:
BigML bindings for Node-RED
134 lines (122 loc) • 8.66 kB
JavaScript
// Compiled by ClojureScript 1.10.520 {:target :nodejs}
goog.provide('bigml_nodered_core.wz.whizzml');
goog.require('cljs.core');
goog.require('clojure.string');
goog.require('bigml_nodered_core.wz.marshal');
goog.require('bigml_nodered_core.wz.units');
bigml_nodered_core.wz.whizzml.wz_let = (function bigml_nodered_core$wz$whizzml$wz_let(inputs){
return cljs.core.reduce.call(null,(function (m,p__2504){
var vec__2505 = p__2504;
var k = cljs.core.nth.call(null,vec__2505,(0),null);
var v = cljs.core.nth.call(null,vec__2505,(1),null);
return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(m),[cljs.core.str.cljs$core$IFn$_invoke$arity$1(k)," ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(v)," "].join('')].join('');
}),"",inputs);
});
bigml_nodered_core.wz.whizzml.wz_output = (function bigml_nodered_core$wz$whizzml$wz_output(step){
return new cljs.core.Keyword(null,"name","name",1843675177).cljs$core$IFn$_invoke$arity$1(step);
});
bigml_nodered_core.wz.whizzml.wz_expand = (function bigml_nodered_core$wz$whizzml$wz_expand(step){
var lets = bigml_nodered_core.wz.whizzml.wz_let.call(null,cljs.core.conj.call(null,new cljs.core.Keyword(null,"lets","lets",-1868055709).cljs$core$IFn$_invoke$arity$1(step),new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, ["result",new cljs.core.Keyword(null,"fun","fun",-1265158045).cljs$core$IFn$_invoke$arity$1(step)], null)));
var ins = new cljs.core.Keyword(null,"in-pars","in-pars",-625064759).cljs$core$IFn$_invoke$arity$1(step);
var outs = new cljs.core.Keyword(null,"out-pars","out-pars",354560694).cljs$core$IFn$_invoke$arity$1(step);
var outs__$1 = (((outs == null))?"result ":bigml_nodered_core.wz.marshal.wz_marshal_map.call(null,outs,"result"));
var outs__$2 = bigml_nodered_core.wz.units.wz_merge.call(null,"r",outs__$1);
return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [lets,outs__$2], null);
});
bigml_nodered_core.wz.whizzml.wz_collect_enclose = (function bigml_nodered_core$wz$whizzml$wz_collect_enclose(var_args){
var args__4736__auto__ = [];
var len__4730__auto___2513 = arguments.length;
var i__4731__auto___2514 = (0);
while(true){
if((i__4731__auto___2514 < len__4730__auto___2513)){
args__4736__auto__.push((arguments[i__4731__auto___2514]));
var G__2515 = (i__4731__auto___2514 + (1));
i__4731__auto___2514 = G__2515;
continue;
} else {
}
break;
}
var argseq__4737__auto__ = ((((1) < args__4736__auto__.length))?(new cljs.core.IndexedSeq(args__4736__auto__.slice((1)),(0),null)):null);
return bigml_nodered_core.wz.whizzml.wz_collect_enclose.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),argseq__4737__auto__);
});
bigml_nodered_core.wz.whizzml.wz_collect_enclose.cljs$core$IFn$_invoke$arity$variadic = (function (list,p__2510){
var map__2511 = p__2510;
var map__2511__$1 = (((((!((map__2511 == null))))?(((((map__2511.cljs$lang$protocol_mask$partition0$ & (64))) || ((cljs.core.PROTOCOL_SENTINEL === map__2511.cljs$core$ISeq$))))?true:false):false))?cljs.core.apply.call(null,cljs.core.hash_map,map__2511):map__2511);
var force = cljs.core.get.call(null,map__2511__$1,new cljs.core.Keyword(null,"force","force",781957286),false);
var delim1 = cljs.core.get.call(null,map__2511__$1,new cljs.core.Keyword(null,"delim1","delim1",-1982105868),"[");
var delim2 = cljs.core.get.call(null,map__2511__$1,new cljs.core.Keyword(null,"delim2","delim2",932383200),"]");
var sep = cljs.core.get.call(null,map__2511__$1,new cljs.core.Keyword(null,"sep","sep",1970430530)," ");
if(cljs.core._EQ_.call(null,cljs.core.count.call(null,list),(0))){
if(cljs.core._EQ_.call(null,force,true)){
return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(delim1),cljs.core.str.cljs$core$IFn$_invoke$arity$1(delim2)].join('');
} else {
return "";
}
} else {
if(cljs.core._EQ_.call(null,cljs.core.count.call(null,list),(1))){
if(cljs.core._EQ_.call(null,force,true)){
return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(delim1),cljs.core.str.cljs$core$IFn$_invoke$arity$1(cljs.core.first.call(null,list)),cljs.core.str.cljs$core$IFn$_invoke$arity$1(delim2)].join('');
} else {
return cljs.core.first.call(null,list);
}
} else {
return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(delim1),cljs.core.str.cljs$core$IFn$_invoke$arity$1(clojure.string.join.call(null,sep,list)),cljs.core.str.cljs$core$IFn$_invoke$arity$1(delim2)].join('');
}
}
});
bigml_nodered_core.wz.whizzml.wz_collect_enclose.cljs$lang$maxFixedArity = (1);
/** @this {Function} */
bigml_nodered_core.wz.whizzml.wz_collect_enclose.cljs$lang$applyTo = (function (seq2508){
var G__2509 = cljs.core.first.call(null,seq2508);
var seq2508__$1 = cljs.core.next.call(null,seq2508);
var self__4717__auto__ = this;
return self__4717__auto__.cljs$core$IFn$_invoke$arity$variadic(G__2509,seq2508__$1);
});
bigml_nodered_core.wz.whizzml.wz_collect_let = (function bigml_nodered_core$wz$whizzml$wz_collect_let(lets,body){
return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(bigml_nodered_core.wz.whizzml.wz_collect_enclose.call(null,new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, [lets], null),new cljs.core.Keyword(null,"delim1","delim1",-1982105868),"(let (",new cljs.core.Keyword(null,"delim2","delim2",932383200),") ",new cljs.core.Keyword(null,"force","force",781957286),true)),cljs.core.str.cljs$core$IFn$_invoke$arity$1(body),")"].join('');
});
bigml_nodered_core.wz.whizzml.wz_collect = (function bigml_nodered_core$wz$whizzml$wz_collect(name,exprs){
var lets = cljs.core.first.call(null,exprs);
var body = cljs.core.last.call(null,exprs);
return bigml_nodered_core.wz.units.wz_defn.call(null,name,bigml_nodered_core.wz.whizzml.wz_collect_enclose.call(null,new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, ["r"], null),new cljs.core.Keyword(null,"delim1","delim1",-1982105868),"(",new cljs.core.Keyword(null,"delim2","delim2",932383200),")"),bigml_nodered_core.wz.whizzml.wz_collect_let.call(null,lets,body));
});
bigml_nodered_core.wz.whizzml.wz_mangle = (function bigml_nodered_core$wz$whizzml$wz_mangle(name){
return clojure.string.lower_case.call(null,clojure.string.replace.call(null,name," ","-"));
});
bigml_nodered_core.wz.whizzml.wz_step = (function bigml_nodered_core$wz$whizzml$wz_step(step){
return bigml_nodered_core.wz.whizzml.wz_collect.call(null,bigml_nodered_core.wz.whizzml.wz_mangle.call(null,new cljs.core.Keyword(null,"name","name",1843675177).cljs$core$IFn$_invoke$arity$1(step)),bigml_nodered_core.wz.whizzml.wz_expand.call(null,step));
});
bigml_nodered_core.wz.whizzml.wz_run_step = (function bigml_nodered_core$wz$whizzml$wz_run_step(m,step){
var input = cljs.core.first.call(null,cljs.core.last.call(null,m));
var wz_var_name = ((function (input){
return (function (p1__2516_SHARP_){
return [cljs.core.str.cljs$core$IFn$_invoke$arity$1(bigml_nodered_core.wz.whizzml.wz_mangle.call(null,p1__2516_SHARP_)),"-out"].join('');
});})(input))
;
return cljs.core.conj.call(null,m,new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [wz_var_name.call(null,new cljs.core.Keyword(null,"name","name",1843675177).cljs$core$IFn$_invoke$arity$1(step)),["(",cljs.core.str.cljs$core$IFn$_invoke$arity$1(bigml_nodered_core.wz.whizzml.wz_mangle.call(null,new cljs.core.Keyword(null,"name","name",1843675177).cljs$core$IFn$_invoke$arity$1(step)))," ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(input),")"].join('')], null));
});
bigml_nodered_core.wz.whizzml.whizzml = (function bigml_nodered_core$wz$whizzml$whizzml(stack,msg){
var stack__$1 = cljs.core.reverse.call(null,stack);
var init = cljs.core.js__GT_clj.call(null,(function (){var or__4131__auto__ = msg.payload;
if(cljs.core.truth_(or__4131__auto__)){
return or__4131__auto__;
} else {
return msg;
}
})());
return clojure.string.join.call(null,"\n",cljs.core.concat.call(null,cljs.core.map.call(null,((function (stack__$1,init){
return (function (step){
return bigml_nodered_core.wz.whizzml.wz_step.call(null,step);
});})(stack__$1,init))
,stack__$1),cljs.core.map.call(null,((function (stack__$1,init){
return (function (def){
return bigml_nodered_core.wz.units.wz_def.call(null,cljs.core.first.call(null,def),cljs.core.last.call(null,def));
});})(stack__$1,init))
,cljs.core.reduce.call(null,((function (stack__$1,init){
return (function (acc,step){
return bigml_nodered_core.wz.whizzml.wz_run_step.call(null,acc,step);
});})(stack__$1,init))
,new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, [new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, ["init",init], null)], null),stack__$1))));
});
//# sourceMappingURL=whizzml.js.map?rel=1628192450568