limit space of InetAddress4/6

sci

@@ -1 +1 @@
-Subproject commit 5e18ac960f67216c4893c5a871a744616603a884
+Subproject commit 0bdd57d66da35d7a9c7ea3b10666a6b4b786808a

src/babashka/impl/classes.clj

@@ -78,7 +78,11 @@
         java.lang.reflect.AccessibleObject
         {:methods [{:name "canAccess"}]}
         java.lang.reflect.Method
-        {:methods [{:name "getName"}]}}
+        {:methods [{:name "getName"}]}
+        java.net.Inet4Address
+        {:methods [{:name "getHostAddress"}]}
+        java.net.Inet6Address
+        {:methods [{:name "getHostAddress"}]}}
     features/hsqldb? (assoc `org.hsqldb.dbinfo.DatabaseInformationFull
                             {:methods [{:name "<init>"
                                         :parameterTypes ["org.hsqldb.Database"]}]}
@@ -170,8 +174,6 @@
           java.net.DatagramPacket
           java.net.HttpURLConnection
           java.net.InetAddress
-          java.net.Inet4Address
-          java.net.Inet6Address
           java.net.InetSocketAddress
           java.net.ServerSocket
           java.net.Socket

test/babashka/main_test.clj

@@ -789,6 +789,9 @@ true")))
 (.read pi)
 "))))
 
+(deftest InetAddress-test
+  (is (= "192.168.2.2" (bb nil "(-> (java.net.InetAddress/getByName \"192.168.2.2\") (.getHostAddress))"))))
+
 ;;;; Scratch
 
 (comment