diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-10-13 02:57:29 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-10-13 02:57:29 +0000 |
| commit | 310f89627a6222bd194770624bac4ed84c3a338e (patch) | |
| tree | d745cd00761522e5b550b102074e2c9014cabb01 /src | |
| parent | 170bace615638e8ef0aae1db1e86341b2032db2c (diff) | |
added print-method for Namespaces
Diffstat (limited to 'src')
| -rw-r--r-- | src/clj/clojure/boot.clj | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/clj/clojure/boot.clj b/src/clj/clojure/boot.clj index 34b49bc4..7d8ae028 100644 --- a/src/clj/clojure/boot.clj +++ b/src/clj/clojure/boot.clj @@ -3567,6 +3567,11 @@ (.append w \#) (print-method (str p) w)) +(defmethod print-method clojure.lang.Namespace [n #^Writer w] + (.write w "#=(find-ns ") + (print-method (.name n) w) + (.write w ")")) + (def #^{:private true} print-initialized true) (defmacro declare |