Quite right!  Being a variation on the actual implementation of the
'and macro, it's probably easier to understand than my cobbled
together version (needing a gensym should have been a giveaway).

On Jul 23, 4:07 pm, ".Bill Smith" <william.m.sm...@gmail.com> wrote:
> For that matter, I could do this:
>
> (defmacro andp
>   ([] true)
>   ([x p] `(~p ~x))
>   ([x p & next]
>      `(let [and# (~p ~x)]
>         (if and# (andp ~x ~...@next) and#))))
>
> On Jul 23, 5:33 pm, ataggart <alex.tagg...@gmail.com> wrote:
>
>
>
> > Not that preserves the short-circuiting behavior of 'and.  This works
> > though:
>
> > (defmacro andf [& fns]
> >   (let [x# (gensym)]
> >     `(fn [~x#] (and ~@(map #(list % x#) fns)))))
>
> > user=> (filter (andf integer? odd?) [1 2 3.1])
> > (1)
>
> > On Jul 23, 2:27 pm, ".Bill Smith" <william.m.sm...@gmail.com> wrote:
>
> > > I want to filter a list based on the logical AND of a set of
> > > predicates.  For example, let's say I have single-argument functions
> > > f, g, and h (without side-effects), and I want those items x in the
> > > list such that (f x), (g x) and (h x) are all true.  I know I can do
> > > this:
>
> > > (filter #(and (f %) (g %) (h %)) my-list)
>
> > > Is there a more terse way to express the same thing?  I suspect there
> > > is a mechanism similar to (or perhaps a generalization of) composition
> > > for that, but I couldn't find it in the API docs.
>
> > > Bill Smith
> > > Austin, TX

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en

Reply via email to