Skip to content
Browse files

fix TANAL-75

  • Loading branch information...
1 parent bf14074 commit a95b72a1ce519150816d45b8fea0317d35e7ca32 @Bronsa Bronsa committed
Showing with 1 addition and 4 deletions.
  1. +1 −4 src/main/clojure/clojure/tools/analyzer/passes/jvm/validate_loop_locals.clj
View
5 src/main/clojure/clojure/tools/analyzer/passes/jvm/validate_loop_locals.clj
@@ -33,10 +33,7 @@
(assoc ast
:dirty? true
:o-tag cast
- :tag (or (:tag (meta form)) cast)
- :form (if (:tag (meta form))
- (vary-meta form assoc :tag (symbol (.getName ^Class cast)))
- form))
+ :tag (or (:tag (meta form)) cast))
(if (and (:dirty? @atom)
(not (:tag (meta form))))
(dissoc (assoc ast :dirty? true) :o-tag :tag)

0 comments on commit a95b72a

Please sign in to comment.
Something went wrong with that request. Please try again.