bundles/org.simantics.scl.runtime/scl/URL.scl

   1 import "Prelude"
   2
   3 importJava "java.net.URL" where
   4     data URL
   5
   6     @JavaName "<init>"
   7     urlSimple :: String -> URL
   8
   9     @JavaName "<init>"
  10     url :: String -> String -> Integer -> String -> URL
  11
  12     @JavaName "getQuery"
  13     getURLQuery :: URL -> String
  14
  15     @JavaName "getPath"
  16     getURLPath :: URL -> String
  17
  18     @JavaName "getHost"
  19     getURLHost :: URL -> String
  20
  21     @JavaName "getPort"
  22     getURLPort :: URL -> Integer
  23
  24     @JavaName "getProtocol"
  25     getURLScheme :: URL -> String
  26
  27     @JavaName "toExternalForm"
  28     urlToString :: URL -> String
  29
  30 instance Show URL where
  31     show = urlToString