@atomist/clj-editors/out/rewrite_clj/zip/seqz.js

We build a node module `@atomist/clj-editors` here. This allows us to construct clojure editors using `rewrite-cljs`. After adding this dependency, the node application will have access to javascript functions transpiled from clojurescript.

// Compiled by ClojureScript 1.9.946 {: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__4655__auto__ = rewrite_clj.zip.move.down.call(null,zloc);
if(cljs.core.truth_(temp__4655__auto__)){
var n0 = temp__4655__auto__;
var G__12179 = f.call(null,n0);
var G__12179__$1 = (((G__12179 == null))?null:cljs.core.iterate.call(null,((function (G__12179,n0,temp__4655__auto__){
return (function (loc){
var temp__4655__auto____$1 = rewrite_clj.zip.move.right.call(null,loc);
if(cljs.core.truth_(temp__4655__auto____$1)){
var n = temp__4655__auto____$1;
return f.call(null,n);
} else {
return null;
}
});})(G__12179,n0,temp__4655__auto__))
,G__12179));
var G__12179__$2 = (((G__12179__$1 == null))?null:cljs.core.take_while.call(null,cljs.core.identity,G__12179__$1));
var G__12179__$3 = (((G__12179__$2 == null))?null:cljs.core.last.call(null,G__12179__$2));
if((G__12179__$3 == null)){
return null;
} else {
return rewrite_clj.zip.move.up.call(null,G__12179__$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__7866__auto__ = loc;
if(cljs.core.truth_(and__7866__auto__)){
return clojure.zip.node.call(null,loc);
} else {
return and__7866__auto__;
}
})())){
return parent;
} else {
var temp__4655__auto__ = rewrite_clj.zip.move.right.call(null,loc);
if(cljs.core.truth_(temp__4655__auto__)){
var v0 = temp__4655__auto__;
var temp__4655__auto____$1 = f.call(null,v0);
if(cljs.core.truth_(temp__4655__auto____$1)){
var v = temp__4655__auto____$1;
var G__12186 = rewrite_clj.zip.move.right.call(null,v);
var G__12187 = rewrite_clj.zip.move.up.call(null,v);
loc = G__12186;
parent = G__12187;
continue;
} else {
var G__12188 = rewrite_clj.zip.move.right.call(null,v0);
var G__12189 = parent;
loc = G__12188;
parent = G__12189;
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__7866__auto__ = loc;
if(cljs.core.truth_(and__7866__auto__)){
return clojure.zip.node.call(null,loc);
} else {
return and__7866__auto__;
}
})())){
return parent;
} else {
var temp__4655__auto__ = f.call(null,loc);
if(cljs.core.truth_(temp__4655__auto__)){
var v = temp__4655__auto__;
var G__12190 = rewrite_clj.zip.move.right.call(null,rewrite_clj.zip.move.right.call(null,v));
var G__12191 = rewrite_clj.zip.move.up.call(null,v);
loc = G__12190;
parent = G__12191;
continue;
} else {
var G__12192 = rewrite_clj.zip.move.right.call(null,rewrite_clj.zip.move.right.call(null,loc));
var G__12193 = parent;
loc = G__12192;
parent = G__12193;
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__7878__auto__ = rewrite_clj.zip.seqz.map_QMARK_.call(null,zloc);
if(cljs.core.truth_(or__7878__auto__)){
return or__7878__auto__;
} else {
var and__7866__auto__ = rewrite_clj.zip.seqz.seq_QMARK_.call(null,zloc);
if(cljs.core.truth_(and__7866__auto__)){
return cljs.core.integer_QMARK_.call(null,k);
} else {
return and__7866__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__12197 = zloc;
var G__12197__$1 = (((G__12197 == null))?null:rewrite_clj.zip.move.down.call(null,G__12197));
var G__12197__$2 = (((G__12197__$1 == null))?null:rewrite_clj.zip.findz.find_value.call(null,G__12197__$1,k));
if((G__12197__$2 == null)){
return null;
} else {
return rewrite_clj.zip.move.right.call(null,G__12197__$2);
}
} else {
return cljs.core.nth.call(null,(function (){var G__12202 = rewrite_clj.zip.move.down.call(null,zloc);
var G__12202__$1 = (((G__12202 == null))?null:cljs.core.iterate.call(null,rewrite_clj.zip.move.right,G__12202));
if((G__12202__$1 == null)){
return null;
} else {
return cljs.core.take_while.call(null,cljs.core.identity,G__12202__$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__4655__auto__ = rewrite_clj.zip.seqz.get.call(null,zloc,k);
if(cljs.core.truth_(temp__4655__auto__)){
var vloc = temp__4655__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