Skip to content

Instantly share code, notes, and snippets.

@iwillig
Last active December 19, 2015 04:18
Show Gist options
  • Save iwillig/5895689 to your computer and use it in GitHub Desktop.
Save iwillig/5895689 to your computer and use it in GitHub Desktop.
(defn member? [a lat]
(if (empty? lat) false
(or (= (first lat) a)
(recur a (rest lat)))))
clojurescript_test.hello.member_QMARK_ = function member_QMARK_(a, lat) {
while(true) {
if(cljs.core.empty_QMARK_.call(null, lat)) {
return false
}else {
var or__3943__auto__ = cljs.core._EQ_.call(null, cljs.core.first.call(null, lat), a);
if(or__3943__auto__) {
return or__3943__auto__
}else {
var G__4517 = a;
var G__4518 = cljs.core.rest.call(null, lat);
a = G__4517;
lat = G__4518;
continue
}
}
break
}
};
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment