@atomist/clj-editors/target/cljsbuild-compiler-1/rewrite_clj/zip/seqz.js

editor functions that use rewrite-clj and other important things from the clojurescript ecosystem

// Compiled by ClojureScript 1.10.238 {:target :nodejs}
goog.provide('rewrite_clj.zip.seqz');
goog.require('cljs.core');
goog.require('rewrite_clj.zip.base');
goog.require('rewrite_clj.zip.editz');
goog.require('rewrite_clj.zip.findz');
goog.require('rewrite_clj.zip.insert');
goog.require('rewrite_clj.zip.move');
goog.require('clojure.zip');
rewrite_clj.zip.seqz.seq_QMARK_ = (function rewrite_clj$zip$seqz$seq_QMARK_(zloc){
return cljs.core.contains_QMARK_.call(null,new cljs.core.PersistentHashSet(null, new cljs.core.PersistentArrayMap(null, 5, [new cljs.core.Keyword(null,"vector","vector",1902966158),null,new cljs.core.Keyword(null,"list","list",765357683),null,new cljs.core.Keyword(null,"set","set",304602554),null,new cljs.core.Keyword(null,"map","map",1371690461),null,new cljs.core.Keyword(null,"forms","forms",2045992350),null], null), null),rewrite_clj.zip.base.tag.call(null,zloc));
});
rewrite_clj.zip.seqz.list_QMARK_ = (function rewrite_clj$zip$seqz$list_QMARK_(zloc){
return cljs.core._EQ_.call(null,rewrite_clj.zip.base.tag.call(null,zloc),new cljs.core.Keyword(null,"list","list",765357683));
});
rewrite_clj.zip.seqz.vector_QMARK_ = (function rewrite_clj$zip$seqz$vector_QMARK_(zloc){
return cljs.core._EQ_.call(null,rewrite_clj.zip.base.tag.call(null,zloc),new cljs.core.Keyword(null,"vector","vector",1902966158));
});
rewrite_clj.zip.seqz.set_QMARK_ = (function rewrite_clj$zip$seqz$set_QMARK_(zloc){
return cljs.core._EQ_.call(null,rewrite_clj.zip.base.tag.call(null,zloc),new cljs.core.Keyword(null,"set","set",304602554));
});
rewrite_clj.zip.seqz.map_QMARK_ = (function rewrite_clj$zip$seqz$map_QMARK_(zloc){
return cljs.core._EQ_.call(null,rewrite_clj.zip.base.tag.call(null,zloc),new cljs.core.Keyword(null,"map","map",1371690461));
});
rewrite_clj.zip.seqz.map_seq = (function rewrite_clj$zip$seqz$map_seq(f,zloc){
if(cljs.core.truth_(rewrite_clj.zip.seqz.seq_QMARK_.call(null,zloc))){
} else {
throw (new Error("Assert failed: (seq? zloc)"));
}

var temp__5455__auto__ = rewrite_clj.zip.move.down.call(null,zloc);
if(cljs.core.truth_(temp__5455__auto__)){
var n0 = temp__5455__auto__;
var G__22710 = f.call(null,n0);
var G__22710__$1 = (((G__22710 == null))?null:cljs.core.iterate.call(null,((function (G__22710,n0,temp__5455__auto__){
return (function (loc){
var temp__5455__auto____$1 = rewrite_clj.zip.move.right.call(null,loc);
if(cljs.core.truth_(temp__5455__auto____$1)){
var n = temp__5455__auto____$1;
return f.call(null,n);
} else {
return null;
}
});})(G__22710,n0,temp__5455__auto__))
,G__22710));
var G__22710__$2 = (((G__22710__$1 == null))?null:cljs.core.take_while.call(null,cljs.core.identity,G__22710__$1));
var G__22710__$3 = (((G__22710__$2 == null))?null:cljs.core.last.call(null,G__22710__$2));
if((G__22710__$3 == null)){
return null;
} else {
return rewrite_clj.zip.move.up.call(null,G__22710__$3);
}
} else {
return zloc;
}
});
/**
 * Apply function to all value nodes of the given map node.
 */
rewrite_clj.zip.seqz.map_vals = (function rewrite_clj$zip$seqz$map_vals(f,zloc){
if(cljs.core.truth_(rewrite_clj.zip.seqz.map_QMARK_.call(null,zloc))){
} else {
throw (new Error("Assert failed: (map? zloc)"));
}

var loc = rewrite_clj.zip.move.down.call(null,zloc);
var parent = zloc;
while(true){
if(cljs.core.not.call(null,(function (){var and__3911__auto__ = loc;
if(cljs.core.truth_(and__3911__auto__)){
return clojure.zip.node.call(null,loc);
} else {
return and__3911__auto__;
}
})())){
return parent;
} else {
var temp__5455__auto__ = rewrite_clj.zip.move.right.call(null,loc);
if(cljs.core.truth_(temp__5455__auto__)){
var v0 = temp__5455__auto__;
var temp__5455__auto____$1 = f.call(null,v0);
if(cljs.core.truth_(temp__5455__auto____$1)){
var v = temp__5455__auto____$1;
var G__22711 = rewrite_clj.zip.move.right.call(null,v);
var G__22712 = rewrite_clj.zip.move.up.call(null,v);
loc = G__22711;
parent = G__22712;
continue;
} else {
var G__22713 = rewrite_clj.zip.move.right.call(null,v0);
var G__22714 = parent;
loc = G__22713;
parent = G__22714;
continue;
}
} else {
return parent;
}
}
break;
}
});
/**
 * Apply function to all key nodes of the given map node.
 */
rewrite_clj.zip.seqz.map_keys = (function rewrite_clj$zip$seqz$map_keys(f,zloc){
if(cljs.core.truth_(rewrite_clj.zip.seqz.map_QMARK_.call(null,zloc))){
} else {
throw (new Error("Assert failed: (map? zloc)"));
}

var loc = rewrite_clj.zip.move.down.call(null,zloc);
var parent = zloc;
while(true){
if(cljs.core.not.call(null,(function (){var and__3911__auto__ = loc;
if(cljs.core.truth_(and__3911__auto__)){
return clojure.zip.node.call(null,loc);
} else {
return and__3911__auto__;
}
})())){
return parent;
} else {
var temp__5455__auto__ = f.call(null,loc);
if(cljs.core.truth_(temp__5455__auto__)){
var v = temp__5455__auto__;
var G__22715 = rewrite_clj.zip.move.right.call(null,rewrite_clj.zip.move.right.call(null,v));
var G__22716 = rewrite_clj.zip.move.up.call(null,v);
loc = G__22715;
parent = G__22716;
continue;
} else {
var G__22717 = rewrite_clj.zip.move.right.call(null,rewrite_clj.zip.move.right.call(null,loc));
var G__22718 = parent;
loc = G__22717;
parent = G__22718;
continue;
}
}
break;
}
});
/**
 * Apply function to all value nodes in the given seq node. Iterates over
 * value nodes of maps but over each element of a seq.
 */
rewrite_clj.zip.seqz.map = (function rewrite_clj$zip$seqz$map(f,zloc){
if(cljs.core.truth_(rewrite_clj.zip.seqz.seq_QMARK_.call(null,zloc))){
} else {
throw (new Error("Assert failed: (seq? zloc)"));
}

if(cljs.core.truth_(rewrite_clj.zip.seqz.map_QMARK_.call(null,zloc))){
return rewrite_clj.zip.seqz.map_vals.call(null,f,zloc);
} else {
return rewrite_clj.zip.seqz.map_seq.call(null,f,zloc);
}
});
/**
 * If a map is given, get element with the given key; if a seq is given, get nth element.
 */
rewrite_clj.zip.seqz.get = (function rewrite_clj$zip$seqz$get(zloc,k){
if(cljs.core.truth_((function (){var or__3922__auto__ = rewrite_clj.zip.seqz.map_QMARK_.call(null,zloc);
if(cljs.core.truth_(or__3922__auto__)){
return or__3922__auto__;
} else {
var and__3911__auto__ = rewrite_clj.zip.seqz.seq_QMARK_.call(null,zloc);
if(cljs.core.truth_(and__3911__auto__)){
return cljs.core.integer_QMARK_.call(null,k);
} else {
return and__3911__auto__;
}
}
})())){
} else {
throw (new Error("Assert failed: (or (map? zloc) (and (seq? zloc) (integer? k)))"));
}

if(cljs.core.truth_(rewrite_clj.zip.seqz.map_QMARK_.call(null,zloc))){
var G__22719 = zloc;
var G__22719__$1 = (((G__22719 == null))?null:rewrite_clj.zip.move.down.call(null,G__22719));
var G__22719__$2 = (((G__22719__$1 == null))?null:rewrite_clj.zip.findz.find_value.call(null,G__22719__$1,k));
if((G__22719__$2 == null)){
return null;
} else {
return rewrite_clj.zip.move.right.call(null,G__22719__$2);
}
} else {
return cljs.core.nth.call(null,(function (){var G__22720 = rewrite_clj.zip.move.down.call(null,zloc);
var G__22720__$1 = (((G__22720 == null))?null:cljs.core.iterate.call(null,rewrite_clj.zip.move.right,G__22720));
if((G__22720__$1 == null)){
return null;
} else {
return cljs.core.take_while.call(null,cljs.core.identity,G__22720__$1);
}
})(),k);
}
});
/**
 * Set map/seq element to the given value.
 */
rewrite_clj.zip.seqz.assoc = (function rewrite_clj$zip$seqz$assoc(zloc,k,v){
var temp__5455__auto__ = rewrite_clj.zip.seqz.get.call(null,zloc,k);
if(cljs.core.truth_(temp__5455__auto__)){
var vloc = temp__5455__auto__;
return rewrite_clj.zip.move.up.call(null,rewrite_clj.zip.editz.replace.call(null,vloc,v));
} else {
if(cljs.core.truth_(rewrite_clj.zip.seqz.map_QMARK_.call(null,zloc))){
return rewrite_clj.zip.insert.append_child.call(null,rewrite_clj.zip.insert.append_child.call(null,zloc,k),v);
} else {
throw (new Error(["index out of bounds: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(k)].join('')));
}
}
});

//# sourceMappingURL=seqz.js.map