X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;ds=sidebyside;f=bundles%2Forg.simantics.scl.rest%2Fscl%2FHTTP%2FMediaType.scl;fp=bundles%2Forg.simantics.scl.rest%2Fscl%2FHTTP%2FMediaType.scl;h=95be9944addff29994fef27bfaeaa7eb5018d560;hb=0edd88ddfb4c73f2689dd3b504be01209b74a32c;hp=0000000000000000000000000000000000000000;hpb=8e8367aa523006cefa590f8cda8ed30818a6eb71;p=simantics%2Fplatform.git

diff --git a/bundles/org.simantics.scl.rest/scl/HTTP/MediaType.scl b/bundles/org.simantics.scl.rest/scl/HTTP/MediaType.scl
new file mode 100644
index 000000000..95be9944a
--- /dev/null
+++ b/bundles/org.simantics.scl.rest/scl/HTTP/MediaType.scl
@@ -0,0 +1,19 @@
+importJava "javax.ws.rs.core.MediaType" where
+    data MediaType
+    
+    WILDCARD_TYPE :: MediaType
+    APPLICATION_XML_TYPE :: MediaType
+    APPLICATION_ATOM_XML_TYPE :: MediaType
+    APPLICATION_XHTML_XML_TYPE :: MediaType
+    APPLICATION_SVG_XML_TYPE :: MediaType
+    APPLICATION_JSON_TYPE :: MediaType
+    APPLICATION_FORM_URLENCODED_TYPE :: MediaType
+    MULTIPART_FORM_DATA_TYPE :: MediaType
+    APPLICATION_OCTET_STREAM_TYPE :: MediaType
+    TEXT_PLAIN_TYPE :: MediaType
+    TEXT_XML_TYPE :: MediaType
+    TEXT_HTML_TYPE :: MediaType
+    
+    @JavaName valueOf
+    mediaType :: String -> MediaType
+    withCharset :: MediaType -> String -> <Proc> MediaType
\ No newline at end of file