-import "Prelude"\r
-\r
-importJava "java.net.URL" where\r
- data URL\r
- \r
- @JavaName "<init>"\r
- urlSimple :: String -> URL\r
- \r
- @JavaName "<init>"\r
- url :: String -> String -> Integer -> String -> URL\r
- \r
- @JavaName "getQuery"\r
- getURLQuery :: URL -> String \r
- \r
- @JavaName "getPath"\r
- getURLPath :: URL -> String\r
- \r
- @JavaName "getHost"\r
- getURLHost :: URL -> String\r
- \r
- @JavaName "getPort"\r
- getURLPort :: URL -> Integer\r
- \r
- @JavaName "getProtocol"\r
- getURLScheme :: URL -> String\r
- \r
- @JavaName "toExternalForm"\r
- urlToString :: URL -> String\r
- \r
-instance Show URL where\r
+import "Prelude"
+
+importJava "java.net.URL" where
+ data URL
+
+ @JavaName "<init>"
+ urlSimple :: String -> URL
+
+ @JavaName "<init>"
+ url :: String -> String -> Integer -> String -> URL
+
+ @JavaName "getQuery"
+ getURLQuery :: URL -> String
+
+ @JavaName "getPath"
+ getURLPath :: URL -> String
+
+ @JavaName "getHost"
+ getURLHost :: URL -> String
+
+ @JavaName "getPort"
+ getURLPort :: URL -> Integer
+
+ @JavaName "getProtocol"
+ getURLScheme :: URL -> String
+
+ @JavaName "toExternalForm"
+ urlToString :: URL -> String
+
+instance Show URL where
show = urlToString
\ No newline at end of file