@atomist/clj-editors/out/rewrite_clj/zip/base.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.base');
goog.require('cljs.core');
goog.require('rewrite_clj.node');
goog.require('rewrite_clj.parser');
goog.require('rewrite_clj.zip.whitespace');
goog.require('clojure.zip');
/**
 * Create zipper over the given Clojure/EDN node.
 */
rewrite_clj.zip.base.edn_STAR_ = (function rewrite_clj$zip$base$edn_STAR_(node){
return clojure.zip.zipper.call(null,rewrite_clj.node.inner_QMARK_,cljs.core.comp.call(null,cljs.core.seq,rewrite_clj.node.children),rewrite_clj.node.replace_children,node);
});
/**
 * Create zipper over the given Clojure/EDN node and move
 * to the first non-whitespace/non-comment child.
 */
rewrite_clj.zip.base.edn = (function rewrite_clj$zip$base$edn(node){
while(true){
if(cljs.core._EQ_.call(null,rewrite_clj.node.tag.call(null,node),new cljs.core.Keyword(null,"forms","forms",2045992350))){
var top = rewrite_clj.zip.base.edn_STAR_.call(null,node);
var or__7878__auto__ = rewrite_clj.zip.whitespace.skip_whitespace.call(null,clojure.zip.down.call(null,top));
if(cljs.core.truth_(or__7878__auto__)){
return or__7878__auto__;
} else {
return top;
}
} else {
var G__11517 = rewrite_clj.node.forms_node.call(null,new cljs.core.PersistentVector(null, 1, 5, cljs.core.PersistentVector.EMPTY_NODE, [node], null));
node = G__11517;
continue;
}
break;
}
});
/**
 * Get tag of node at the current zipper location.
 */
rewrite_clj.zip.base.tag = (function rewrite_clj$zip$base$tag(zloc){
var G__11520 = zloc;
var G__11520__$1 = (((G__11520 == null))?null:clojure.zip.node.call(null,G__11520));
if((G__11520__$1 == null)){
return null;
} else {
return rewrite_clj.node.tag.call(null,G__11520__$1);
}
});
/**
 * Get sexpr represented by the given node.
 */
rewrite_clj.zip.base.sexpr = (function rewrite_clj$zip$base$sexpr(zloc){
var G__11526 = zloc;
var G__11526__$1 = (((G__11526 == null))?null:clojure.zip.node.call(null,G__11526));
if((G__11526__$1 == null)){
return null;
} else {
return rewrite_clj.node.sexpr.call(null,G__11526__$1);
}
});
/**
 * Get children as s-expressions.
 */
rewrite_clj.zip.base.child_sexprs = (function rewrite_clj$zip$base$child_sexprs(zloc){
var G__11533 = zloc;
var G__11533__$1 = (((G__11533 == null))?null:clojure.zip.node.call(null,G__11533));
if((G__11533__$1 == null)){
return null;
} else {
return rewrite_clj.node.child_sexprs.call(null,G__11533__$1);
}
});
/**
 * Get length of printable string for the given zipper location.
 */
rewrite_clj.zip.base.length = (function rewrite_clj$zip$base$length(zloc){
var or__7878__auto__ = (function (){var G__11543 = zloc;
var G__11543__$1 = (((G__11543 == null))?null:clojure.zip.node.call(null,G__11543));
if((G__11543__$1 == null)){
return null;
} else {
return rewrite_clj.node.length.call(null,G__11543__$1);
}
})();
if(cljs.core.truth_(or__7878__auto__)){
return or__7878__auto__;
} else {
return (0);
}
});
/**
 * Create zipper from String.
 */
rewrite_clj.zip.base.of_string = (function rewrite_clj$zip$base$of_string(s){
var G__11548 = s;
var G__11548__$1 = (((G__11548 == null))?null:rewrite_clj.parser.parse_string_all.call(null,G__11548));
if((G__11548__$1 == null)){
return null;
} else {
return rewrite_clj.zip.base.edn.call(null,G__11548__$1);
}
});
/**
 * Create string representing the current zipper location.
 */
rewrite_clj.zip.base.string = (function rewrite_clj$zip$base$string(zloc){
var G__11551 = zloc;
var G__11551__$1 = (((G__11551 == null))?null:clojure.zip.node.call(null,G__11551));
if((G__11551__$1 == null)){
return null;
} else {
return rewrite_clj.node.string.call(null,G__11551__$1);
}
});
/**
 * Create string representing the zipped-up zipper.
 */
rewrite_clj.zip.base.root_string = (function rewrite_clj$zip$base$root_string(zloc){
var G__11559 = zloc;
var G__11559__$1 = (((G__11559 == null))?null:clojure.zip.root.call(null,G__11559));
if((G__11559__$1 == null)){
return null;
} else {
return rewrite_clj.node.string.call(null,G__11559__$1);
}
});

//# sourceMappingURL=base.js.map