Well I think that this is a different case.

On 27 Sie, 03:15, gaz jones <gareth.e.jo...@gmail.com> wrote:
> do you know about the re-groups function, or are you just doing this
> for an exercise?
>
> On Fri, Aug 26, 2011 at 6:57 PM, Michael Jaaka
>
>
>
>
>
>
>
> <michael.ja...@googlemail.com> wrote:
> > Hi!
>
> > I have got
>
> > (def *g)
> > (def *g1)
> > (def *g2)
> > (def *g3)
> > (def *g4)
> > (def *g5)
> > (def *g6)
>
> > (defmacro grep[ pat in & body ]
> >        `(do (when-let[ r# (re-matches (re-pattern ~pat) ~in) ]
> >                        (binding [ *g (first r#) *g1 (get r# 1)  *g2 (get r# 
> > 2)  *g3 (get
> > r# 3)
> >                                        *g4 (get r# 4)  *g5 (get r# 5)  *g6 
> > (get r# 6)  ]
> >                        ~@body
> >                                ))))
>
> > (grep "(.+)-(.+)" "1-4"
> >        (println *g *g1 *g2)
> >        )
>
> > I need to optimize the *gx so it won't look like hand written. Anyone?
> > I was trying to use with-bindings and #' but it doesn't work. Also
> > push and pop of thread bindings didn't want to work.
>
> > --
> > 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

-- 
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