Much better! Thanks.
On Jul 5, 1:20 pm, Adrian Cuthbertson <adrian.cuthbert...@gmail.com>
wrote:
> You could use assoc-in...
>
> (def rms (ref {:key1 {:key2 {:key3 #{}}}}))
>
> (dosync (alter rms assoc-in [:key1 :key2 :key3] "foo"))
> {:key1 {:key2 {:key3 "foo"}}}
>
> Rgds, Adrian.
>
> On Sun, Jul 5, 2009 at 6:07 AM, Rowdy Rednose <rowdy.redn...@gmx.net> wrote:
>
> > Say I have a data structure like this
>
> > (def ref-map-map-map-set (ref {:key1 {:key2 {:key3 #{}}}}))
>
> > If I want to add a new member to the set which is the value of :key3,
> > I currently do this:
>
> > (dosync
> > (let [key1 (:key1 @ref-map-map-map-set)
> > key2 (:key2 key1)
> > key3 (:key3 key2)]
> > (ref-set ref-map-map-map-set (assoc @ref-map-map-map-set :key1
> > (assoc key1 :key2 (assoc key2 :key3 (conj key3 new-member)))))))
>
> > Do I really have to assoc all the way through to the inner map? Isn't
> > there a more succinct way to write this? In Common Lisp there's (setf
> > (getf ...))
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
