The problem is the evaluation. PersistentTreeMap evaluates to the
PersistentArrayMap (or PersistentHashMap).
user=> (class (to-sorted-map '(1 2 3 4)))
clojure.lang.PersistentTreeMap
user=> (class #sorted-map (1 2 3 4))
clojure.lang.PersistentArrayMap
user=> (class #sorted-map (1 2 3 4 5 6 7 8 9 0 11 12 13 14 15 16 17 18 19
20))
clojure.lang.PersistentHashMap
user=> (read-string "#sorted-map (1 2 3 4)")
#sorted-map (1 2 3 4)
user=> #sorted-map (1 2 3 4)
{1 2, 3 4}
user=> (to-sorted-map '(1 2 3 4))
#sorted-map (1 2 3 4)
user=> (eval (to-sorted-map '(1 2 3 4)))
{1 2, 3 4}
JW
On Thursday, August 8, 2013 7:29:16 PM UTC+2, David James wrote:
>
> I am having trouble with an implementation of a custom reader literal
> called #sorted-set.
>
> Please see my short code first:
> https://github.com/xpe/sorted-map-literal
>
> Why does this work correctly:
> (to-sorted-map '(1 2 3 4))
> #sorted-map (1 2 3 4) ; correct
>
> While this does not?
> #sorted-map (1 2 3 4)
> {1 2, 3 4} ; incorrect
>
> Thanks,
> David
>
> P.S. BTW, I understand that I should not release non-namespaced reader
> literals; this is just a self-contained experiment.
>
--
--
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 unsubscribe from this group and stop receiving emails from it, send an email
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
