Add support for .getWatches on atoms

src/babashka/impl/classes.clj

@@ -158,7 +158,9 @@
     {:methods [{:name "getResource"}
                {:name "getResources"}
                {:name "getResourceAsStream"}
-               {:name "getParent"}]}})
+               {:name "getParent"}]}
+    clojure.lang.ARef
+    {:methods [{:name "getWatches"}]}})
 
 (def custom-map
   (cond->

test/babashka/main_test.clj

@@ -843,6 +843,9 @@ true")))
 (deftest index-of-test
   (is (= 1 (bb nil "(.indexOf (map inc [1 2 3]) 3)"))))
 
+(deftest get-watches-test
+  (is (true? (bb nil "(map? (.getWatches (doto (atom nil) (add-watch :foo (fn [k r o n])))))" ))))
+
 ;;;; Scratch
 
 (comment