diff --git a/src/babashka/impl/classes.clj b/src/babashka/impl/classes.clj index b4ebf827..cf2fc3e7 100644 --- a/src/babashka/impl/classes.clj +++ b/src/babashka/impl/classes.clj @@ -13,7 +13,8 @@ ;; (identical? os :mac))) (def classes - '{:all [java.io.BufferedReader + '{:all [clojure.lang.ExceptionInfo + java.io.BufferedReader java.io.BufferedWriter java.io.ByteArrayInputStream java.io.ByteArrayOutputStream @@ -112,8 +113,7 @@ :methods [borkdude.graal.LockFix ;; support for locking ] :fields [clojure.lang.PersistentQueue] - :instance-checks [clojure.lang.ExceptionInfo - clojure.lang.IObj + :instance-checks [clojure.lang.IObj clojure.lang.IEditableCollection] :custom {clojure.lang.LineNumberingPushbackReader {:allPublicConstructors true :allPublicMethods true} diff --git a/test/babashka/main_test.clj b/test/babashka/main_test.clj index d7172641..12c9d514 100644 --- a/test/babashka/main_test.clj +++ b/test/babashka/main_test.clj @@ -378,6 +378,9 @@ (deftest download-and-extract-test (is (= 6 (bb nil (io/file "test" "babashka" "scripts" "download_and_extract_zip.bb"))))) +(deftest get-message-on-exception-info-test + (is "foo" (bb nil "(try (throw (ex-info \"foo\" {})) (catch Exception e (.getMessage e)))"))) + ;;;; Scratch (comment