; SLIME 20100404
user> (defn hi "hello" [])
#'user/hi
user> (def bonjour hi)
#'user/bonjour
user> (doc bonjour)
-------------------------
user/bonjour
nil
  nil
nil
user> (alter-meta! #'bonjour merge (meta #'hi))
{:doc "hello", :arglists ([]), :ns #<Namespace user>, :name hi, :file "NO_SOURCE_FILE", :line 1}
user> (doc bonjour)
-------------------------
user/hi
([])
  hello
nil
user> 

Generated by Phil Hagelberg using scpaste at Sat Sep 25 21:48:03 2010. PDT. (raw)