CLJ-1472 Ensure monitor object is on stack, for verifiers

Signed-off-by: Stuart Halloway <[email protected]>

Author: richhickey

src/clj/clojure/core.clj

@@ -1651,10 +1651,12 @@
   [x & body]
   `(let [lockee# ~x]
      (try
-      (monitor-enter lockee#)
-      ~@body
-      (finally
-       (monitor-exit lockee#)))))
+       (let [locklocal# lockee#]
+         (monitor-enter locklocal#)
+         (try
+           ~@body
+           (finally
+            (monitor-exit locklocal#)))))))
 
 (defmacro ..
   "form => fieldName-symbol or (instanceMethodName-symbol args*)