On Wed, Feb 25, 2009 at 10:09 PM, David Nolen <dnolen.li...@gmail.com> wrote:
> This is nothing short of amazing for those who want to build ad-hoc type
> systems.

Plus custom printing.

(defmethod print-method ::Foo [o w]
  (doto w
    (.write "#<Foo: ")
    (.write (:x o))
    (.write ">")))

(defn make-foo [x]
  #^{:type ::Foo} {:x x})

user=> (make-foo "whee")
#<Foo: whee>

--Chouser

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