http://dev.clojure.org/jira This file is an XML representation of an issue en-us 4.4 649 25-07-2011 http://dev.clojure.org/jira/browse/CLJ-1039 Clojure <p>In lein 1.7.1 (and CCW) the form (def ^{:type :anything} mydef 1) throws "ClassCastException clojure.lang.Var cannot be cast to clojure.lang.IObj clojure.core/with-meta (core.clj:211)".<br/> This seems to be due to setting the :type metadata. With other metadata keys it works well.</p> <p>If it is intended to forbid setting the :type metadata, then there should be an appropriate error message instead of the ClassCastException</p> <p>In lein2 repl which is using "REPL-y 0.1.0-beta8" the exception does not occur.</p> <p>Full stacktrace:<br/> java.lang.ClassCastException: clojure.lang.Var cannot be cast to clojure.lang.IObj<br/> at clojure.core$with_meta.invoke (core.clj:211)<br/> clojure.core$vary_meta.doInvoke (core.clj:617)<br/> clojure.lang.RestFn.invoke (RestFn.java:425)<br/> clojure.core/fn (core_print.clj:76)<br/> clojure.lang.MultiFn.invoke (MultiFn.java:167)<br/> clojure.core$pr_on.invoke (core.clj:3266)<br/> clojure.core$pr.invoke (core.clj:3278)<br/> clojure.lang.AFn.applyToHelper (AFn.java:161)<br/> clojure.lang.RestFn.applyTo (RestFn.java:132)<br/> clojure.core$apply.invoke (core.clj:601)<br/> clojure.core$prn.doInvoke (core.clj:3311)<br/> clojure.lang.RestFn.invoke (RestFn.java:408)<br/> clojure.main$repl$read_eval_print__6405.invoke (main.clj:246)<br/> clojure.main$repl$fn__6410.invoke (main.clj:266)<br/> clojure.main$repl.doInvoke (main.clj:266)<br/> clojure.lang.RestFn.invoke (RestFn.java:512)<br/> user$eval27$acc_<em>3261</em><em>auto</em>__<em>30$fn</em>_32.invoke (NO_SOURCE_FILE:1)<br/> clojure.lang.AFn.run (AFn.java:24)<br/> java.lang.Thread.run (Thread.java:662)</p> Ubuntu, lein 1.7.1 - lein repl CLJ-1039

Using 'def with metadata {:type :anything} throws ClassCastException

Defect Minor Open Unresolved Unassigned Gunnar Völkel Thu, 9 Aug 2012 06:05:34 -0500 Fri, 10 Aug 2012 13:40:31 -0500 Release 1.4 0 0 <p>This is caused by the printer dispatch function</p> <div class="preformatted panel" style="border-width: 1px;"><div class="preformattedContent panelContent"> <pre>(defmulti print-method (fn [x writer] (let [t (get (meta x) :type)] (if (keyword? t) t (class x))))) </pre> </div></div> <p>which ends up calling the default dispatch, which tries to vary-meta.</p> Approval Vetted Global Rank