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